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Vorwort 


Dieses Buch will in die Kunst des Programmierens in Maschinenspra¬ 
che einführen. Es wäre zu wünschen, daß der Leser bereits in einer 
anderen Sprache programmiert hat oder zumindest eine Vorstellung 
davon hat, was Programmieren eigentlich ist. Die Kenntnis von Pro¬ 
grammablaufplänen oder Struktogrammen wäre nützlich, ist aber nicht 
unbedingt erforderlich. 

Das Buch will Anfänger anhand zahlreicher Beispiele in die Maschi¬ 
nensprache des Z80 einführen. Es verzichtet dabei ganz bewußt auf eine 
formale Systematik, die abstrakt die einzelnen Prozessorfunktionen 
abhandelt und die notwendigen Beispiele schuldig bleibt. Ein derartiges 
Buch könnte jedoch mit Gewinn (muß aber nicht) als Nachschlagewerk 
nebenbei benutzt werden. Wichtiger ist hingegen die Verfügbarkeit 
eines Z80-Handbuchs (siehe Anhang B). Notfalls kann man auch die 
Seiten 165 bis 168 des MZ-700-Handbuchs zu Rate ziehen, das in jedem 
Fall verfügbar sein sollte. 

Konkrete Beispiele erscheinen aus folgenden Gründen für eine Ein¬ 
führung besonders wichtig: 

1. Das Erlernen von Neuem nach abstrakten Regeln ohne Bezug auf 
(frühere oder aktuelle) Erfahrungen ist ineffektiv; ein Anfänger sollte 
jeden Schritt sofort am Computer nachvollziehen. 

2. Das Programmieren in Maschinensprache erstreckt sich auf einen 
Problemkreis, der sich charakteristisch von dem mit höheren Sprachen 
bearbeiteten unterscheidet. 

3. In der Praxis des Maschineprogrammierens greift man häufig auf die 
fertigen Routinen des Betriebssystems zurück. In den abstrakten Hand¬ 
büchern fehlen wegen des nicht gegebenen Bezugs auf einen konkreten 
Computer die Hinweise hierauf fast völlig. Auf Beispiele wird in diesem 
Buch großer Wert gelegt; es soll sich gerade dadurch von abstrakten 
Darstellungen unterscheiden. Wir beschränken uns dabei auf das, was 
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von der Tastatur her machbar ist; das ist reichlich genug. Hardwarefra¬ 
gen und Probleme der Systemprogrammierung bleiben weithin ausge¬ 
klammert. 

Lernziele sind: 

1. Kennenlernen der wichtigsten Grundbegriffe; 

2. Kennenlernen der wichtigsten Z80-Befehle; 

3. Zurechtfinden in den Handbüchern; 

4. Kennenlernen gängiger Programmstrukturen; 

5. Anregungen für eigene Arbeit; 

6. Anregungen zum Gebrauch von Dienstprogrammen; 

7. Einblick in einige Programmiertricks. 

Die Sprache des Mikroprozessors Z80 (bzw. Z80A) ist überall dieselbe, 
ganz gleich, in welchem Computer der Z80 arbeitet. Die Bedienung der 
Computer ist jedoch in der Regel sehr unterschiedlich, und ihre 
Betriebssysteme sind es auch. Der Verfasser wählte als Beispielmodell 
den MZ-700 aus, weil er ein gängiger Mikrocomputer ist, sich ausge¬ 
zeichnet zum Arbeiten in Maschinensprache eignet und hervorragend 
dokumentiert ist. 

Während der Drucklegung erschien der MZ-800 auf dem Markt. Er ist 
zwar - im Bezug auf die Maschinensprache - nicht so exzellent doku¬ 
mentiert wie die 700er Serie, bietet dafür aber andere Vorzüge. Bei 
entsprechender Einstellung der Betriebsart (DIL-Schalter auf der Rück¬ 
seite) ist er (ohne Aussage bezüglich Drucker) voll kompatibel zum 
MZ-700, so daß das Dargestellte auch für diesen schönen Personalcom¬ 
puter gilt. 

Wer mit einem anderen Z80-Computer arbeitet, wird sicherlich viele 
auch für ihn brauchbare Beispiele und Anregungen finden. Er muß 
jedoch selbst geeignete Speicherbereiche - und in vielen Beispielen die 
entsprechenden Routinen des Betriebssystems - heraussuchen. 

Gehen wir nun ans Tun, fangen wir mit dem Einfacheren an, festigen 
wir es durch Beispiele und bauen wir Schritt für Schritt auf, doch immer 
so, daß sich eine konkrete Anwendung daraus ergibt. Dabei werden vor 
allem Verständnis und Anregung angestrebt. Die Perfektionierung eini¬ 
ger Beispiele bleibt dem Leser überlassen. 


Oldenburg 


Helmut Ostermann 
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Die Sprache der Mikroprozessoren 


Mikroprozessoren tun sehr schnell und sehr zuverlässig, was der 
Mensch ihnen vorschreibt, wenn ihnen diese Vorschriften in einer 
Form mitgeteilt werden, die sie verstehen. Sie reagieren auf elektrische 
Signale, die ihnen der Mensch z. B. über die Tastatur übermittelt. Hält 
man sich dabei streng an bestimmte Regeln, die durch die Bauweise des 
Prozessors bestimmt sind, kann man ihn zu sinnvollem Tun veranlas¬ 
sen. Man nennt auch dieses für zwei Partner verständliche Medium 
«Sprache». 


1.1 Binär- und Hexadezimalzahlen 

Schalt- und Steuerzentrale eines Mikrocomputers ist der Mikroprozes¬ 
sor, auch Central Processing Unit (CPU) oder Microprocess Unit (MPU) 
genannt. Beim Sharp MZ-700 ist dies ein Z80 (bzw. Z80A) der Firma 
Zilog, ein hochintegrierter Baustein von 13 mm Breite und 52 mm 
Länge (der eigentliche Chip ist sehr viel kleiner). Er hat 40 Anschluß- 
beinchen (Pins): 

2 für die Versorgungsspannung; 

1 für den Systemtakt (etwa 4 MHz); 

13 lassen sich als Steuerleitungen bezeichnen; 

8 sind Anfang des Datenbusses und 
16 Anfang des Adreßbusses. 

Für uns sind weiterhin nur die beiden letztgenannten Gruppen von 
Bedeutung: Der Datenbus besteht aus 8 Leiterbahnen (sozusagen Dräh¬ 
ten), die entweder Spannung führen oder nicht. Vorhandensein von 
Spannung (genauer: eines im allgemeinen äußerst kurzen Impulses) 
wird dargestellt durch «1», Fehlen von Spannung (bzw. Impuls) durch 
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"0". Das macht es wesentlich leichter, den momentanen Zustand des 
Datenbusses zu beschreiben: Die Ziffernfolge 00101110 besagt eindeu¬ 
tig, daß der 1., 2., 3. und 5. «Draht» einen Impuls führen und der 0., 4., 6. 
und 7. nicht. Man numeriert hierbei die acht Leitungen von rechts nach 
links und zählt von 0 bis 7. 

Es hat sich als äußerst zweckmäßig erwiesen, derartige Folgen der 
Ziffern 0 und 1 als einheitliche Zahlen anzusehen. Unser Zehnersystem 
kennt die zehn Ziffern 0, 1 ... 9. Es liegt nahe, ein Zahlensystem mit 
nur zwei Ziffern als Zweiersystem (häufiger Binär- oder Dualsystem) zu 
bezeichnen. Bekanntlich haben die Stellen einer Dezimalzahl unter¬ 
schiedliches Gewicht; wir kennen - von rechts nach links - Einer, 
Zehner, Hunderter usw. Ganz entsprechend bedeuten die Stellen der 
Binärzahlen Einer, Zweier, Vierer, Achter, Sechzehner usw. Die Binär¬ 
zahl 00101110 setzt sich dementsprechend zusammen aus 

1 Zweier, 

1 Vierer, 

1 Achter und 
1 Zweiunddreißiger. 

Addiert man das, erhält man den Dezimalwert 46. 

Die kleinste Dateneinheit, die ein Computer kennt, ist eine solche 0- 
oder-1 -Stelle; man nennt sie Bit (engl.: Bißchen, auch erklärt als 
Zusammenziehung von binary digit, Zweierziffer). Mit dieser neuen 
Maßeinheit können wir sagen, daß der Datenbus unseres Computers 
8 bit breit ist. 

Der Datenbus nimmt die als Bitmuster codierten zu verarbeitenden 
Daten z. B. von der Tastatur (bzw. vom Tastenfeldcodierer) auf und 
leitet sie zum Prozessor, zum Speicher, zur Ausgabe usw. Obgleich man 
beim Programmieren in Maschinensprache ums Rechnen nicht herum¬ 
kommt, brauchen wir nichts Schlimmes zu befürchten; wir haben 
nämlich fast schon mehr gerechnet, als eigentlich erforderlich war. 
Man zerlegt üblicherweise achtstellige Binärzahlen in zwei Vierergrup¬ 
pen und deutet jede für sich. Unsere Beispielzahl zerlegt man dement¬ 
sprechend: 0010 1110. Über 15 brauchen wir im Binärsystem nicht 
hinauszurechnen! 
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Eine vierstellige Binärzahl kann 16 verschiedene Werte darstellcn: 

binär 0000 = hexadezimal 0 = dezimal 0 
binär 0001 = hexadezimal 1 = dezimal 1 
binär 0010 = hexadezimal 2 = dezimal 2 
binär 0011= hexadezimal 3 = dezimal 3 
binär 0100 = hexadezimal 4 = dezimal 4 
binär 0101 = hexadezimal 5 = dezimal 5 
binär 0110 = hexadezimal 6 = dezimal 6 
binär 0111 = hexadezimal 7 = dezimal 7 
binär 1000 = hexadezimal 8 = dezimal 8 
binär 1001 = hexadezimal 9 = dezimal 9 
binär 1010 = hexadezimal A = dezimal 10 
binär 1011 = hexadezimal B = dezimal 11 
binär 1100 = hexadezimal C = dezimal 12 
binär 1101 = hexadezimal D = dezimal 13 
binär 1110 = hexadezimal E = dezimal 14 
binär 1111 = hexadezimal F = dezimal 15 

Woher und wozu nun die Buchstaben? Sie dienen hier lediglich als 
Ziffern, als Hexadezimalziffern (man sagt auch Sedezimalziffern, von 
lat. 16). Schon wieder ein neues Zahlsystem? Ja, aber wir werden mit 
ihm bald vertraut sein! Und ohne Kenntnis der Binär- und der Hexadezi¬ 
malzahlen kann man einen Mikroprozessor, insbesondere den Z80, 
nicht programmieren! Schon äußerlich sind die Hexadezimalziffern 
eigentlich recht sympathisch: Zur Darstellung der aufgeführten 16 
Werte kommen wir im Dezimalsystem nur zehnmal mit einer Ziffer 
aus, während wir in sechs Fällen zwei Ziffern benötigen. Das Hexadezi¬ 
malsystem benötigt zur Darstellung dieser Werte stets nur eine Ziffer! 
Damit können wir unsere Beispielzahl auch so schreiben: 

binär 0010 1110 = hexadezimal 2E = dezimal 46, 
oder kürzer: 0010 1110h = 2Eh = 46d. 

Zwei andere Beispiele: 

0110 0100b = 64h = lOOd, 

1111 1111b = FFh = 255d. 

Wir werden künftig die Kürzel b, h und d immer dann anbringen, wenn 
ihr Fehlen Verwechslungen verursachen könnte. 
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Überblick über die Stellenwerte (dezimal angegeben) 


bin: 

2 3 = 

8 

2 2 = 4 

2 1 

= 2 

2° = 

1 

dez: 

10 3 = 

1000 

10 2 = 100 

10 1 

= 10 

10° = 

1 

hex: 

16 3 = 

4096 

16 2 = 256 

16 1 

= 16 

16° = 

1 


Keine Sorge! Höhere Werte benötigen wir nicht. Man kann aus der 
Aufstellung ersehen, daß man im Hexadezimalsystem den jeweils 
höheren Stellenwert durch Multiplikation mit 16 erhält. Wir können 
damit die Hexadezimalzahl 2E auch so deuten: 2 Sechzehner und 14 
Einer, zusammen 46d. 

Sie täten gut daran, sich die sechs neuen Ziffern recht bald einzuprä¬ 
gen. Mit einer mnemotechnischen Hilfe geht das vielleicht schneller: 


A: 

10 

muß man sich so merken; 

B: 

11 

man denke an das Kunstwort «Belf 

C: 

12 

Rechtschreiben 6: «Cwölf»; 

D: 

13 

Dreizehn; 

£: 

14 

vi£rz£hn; 

F: 

15 

Fünfzehn. 


Wir können jetzt feststellen, daß der Adreßbus 16 bit breit ist. Um das 
zu verstehen, stellen wir uns den Speicher unseres Computers als ein 
Regal mit sehr vielen Fächern vor, die durchlaufend numeriert sind. 
Diese Fachnummern heißen Adressen. Das Bitmuster, das der Adreß¬ 
bus bei einem Speicherzugriff gerade trägt, bestimmt, welche Speicher¬ 
stelle angesprochen wird. Die niedrigste Adresse im Speicher ist 0000 
0000 0000 0000b = 0000h, die höchste 1111 1111 1111 111 lb = FFFFh. 
Wir könnten bequemer rechnen, halten uns aber eng an das Gesagte 
und rechnen so: FFFF = 15 ★ 4096 + 15 ★ 256 -I- 15 ★ 16 + 15 = 65535. 
Unser Mikroprozessor kann einen Speicher von 0000 bis FFFF «adres¬ 
sieren», also 65 536 verschiedene Speicherstellen ansprechen, deren 
jede Daten werte von 00 bis FF (0 bis 255) aufnehmen kann. Die beiden 
Werte FF und FFFF sind typisch bzw. eine typische obere Grenze für 
einen Computer von der Größenordnung unseres Sharp. 

Drei kleine Ergänzungen: 

1. Man mache sich klar, daß man bei Verwendung von Dezimalzahlen 
nur 10000 Speicherstellen hätte ansprechen können. Die Verwendung 
von Hexadezimalzahlen bedeutet also einen Gewinn von 555%! 
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2. Eine Gruppe von 8 bit heißt ein Byte. Der Inhalt eines Bytes läßt sich 
als zweistellige Hexadezimalzahl darstellen. 

3. Wir setzen einmal die oben angefangene Zahlenreihe fort: 1, 2, 4, 8, 
16, 32, 64, 128, 256, 512, 1024 ... Daß sich dabei eine Zahl in der Nähe 
von 1000 ergibt, veranlaßte die Informatiker, sie gleichfalls mit Kilo zu 
umschreiben, in Abkürzungen dieses Kilo jedoch mit einem großen K 
zu notieren. Man beachte den Unterschied: 

1000 Meter = 1 Kilometer = 1 km ; 

1024 Byte = 1 Kilobyte = 1 KB. 

Mit dieser Bezeichnungsweise berechnet man leicht: 65 536 Byte = 64 
★ 1024 Byte = 64 Kilobyte = 64 KB. Dieser Wert kennzeichnet also eine 
typische Größenklasse der Home- und Personalcomputer bzw. ihrer 
Speicher. 


1.2 Was sind Maschinenprogramme, wozu dienen sie? 

Wir sollten die Frage, welches denn wohl die verbreitetste Program¬ 
miersprache für Mikrocomputer sei, nicht vorschnell beantworten. 
Nicht jeder arbeitet in BASIC, aber alle arbeiten in einer Maschinen¬ 
sprache, auch wenn man sie in BASIC (oder Pascal oder Forth usw.) 
programmiert. Maschinensprache heißt die Sprache, in der der Mikro¬ 
prozessor seine Befehle erhält. Auch wenn man den Computer in einer 
höheren problemorientierten Sprache programmiert, arbeitet seine 
CPU in ihrer Maschinensprache. Die Umwandlung aus einer höheren 
in eine Maschinensprache bewirken spezielle Hilfsprogramme, soge¬ 
nannte Interpreter oder Compiler - auch das sind Maschinenpro¬ 
gramme! 

Während man in einer höheren Programmiersprache z. B. mit Fließ- 
kommazahlcn arbeiten, sie miteinander multiplizieren, die Quadrat¬ 
wurzel, den Sinus oder den Logarithmus berechnen kann, kann der 
Mikroprozessor nur ganz einfache Dinge, z. B. zwei ganze Zahlen 
addieren (oder subtrahieren), wobei das Ergebnis 255d = FFh nicht 
übersteigen darf; er kann Binärzahlen um eine Stelle nach links oder 
rechts verschieben (shiften) und viele derartige Elementaroperationen 
mehr. Und nun seine gewaltige Stärke: Er kann das unvorstellbar 
schnell, einige hunderttausend Elementaroperationen in einer Sekunde! 
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Wenn ein BASIC-Programm abläuft, zerlegt der Interpreter das Pro¬ 
gramm, ohne daß der Benutzer das merkt, sehr schnell in eine große 
Anzahl derartiger Elementarschritte, und der Mikroprozessor arbeitet 
das ihm so dargebotene Maschinenprogramm ab. Das geht zwar auch 
recht schnell, doch ohne den Umweg über den Interpreter ginge es 
einige hundert Male schneller. Diesen Unterschied können Sie dra¬ 
stisch erleben, wenn Sie das im Anhang A abgedruckte BASIC-Pro¬ 
gramm eintippen. Es enthält ein eingebundenes Maschinenprogramm. 

Es kann nun - je nach Vorhaben - mehrere Gründe dafür geben, ein 
Problem in Maschinensprache zu programmieren: Um Morsezeichen 
zu dekodieren, wäre BASIC zu langsam. Man braucht dazu auch keine 
höhere Mathematik. Die Maschinensprache ist voll angemessen. Für 
die Darstellung schneller Bewegungen, z. B. eines Tänzers (vgl. 
Abschnitt 19.4) gelten die gleichen Überlegungen. 

Um eine kleine Heizungsanlage zu steuern, braucht man keine neun¬ 
stellige Genauigkeit. Die erforderlichen Wenn-dann-Beziehungen sind 
verhältnismäßig einfach. Man braucht dazu keine höhere Programmier¬ 
sprache und keinen komplizierten Computer. Ein Einplatinenrechner 
tut's auch, und der arbeitet fast immer in Maschinensprache. 

Dem, der Freude an der Technik und Sinn für Zahlen hat, macht der 
Einblick in die Arbeitsweise eines Mikrocomputers ganz einfach Spaß. 
Es gibt viele Aufgaben, die man in Maschinensprache lösen kann. Dazu 
will dieses Buch Einführung und Anregung bieten. Für den, der die 
Maschinensprache beherrscht, bietet sich ein weites Feld an Anwen¬ 
dungsmöglichkeiten: schnell bewegte Spiele, hochkomplizierte Spiele 
(z. B. Schach) oder auch eigene Programmiersprachen oder Varianten 
bestehender Sprachen lassen sich in Maschinensprache konzipieren. 

Wie sieht nun Maschinensprache eigentlich aus? Wir geben ohne 
nähere Erklärung ein Beispiel, in dem die beiden Hexadezimalzahlen 1B 
und A4 addiert werden sollen: 


kl kl Im Im 
kl kl kl Im 
Im Im kl kl 
Im kl Im kl 


Im Im Im kl 
Im kl Im Im 
kl Im Im kl 
kl Im kl kl 


0011 1110 3E 
0001 1011 1B 
1100 0110 C6 
1010 0100 A4 


Das sind drei verschiedene Darstellungsweisen dieses Problems. Links 
wird aufgezeigt, welche Impulskombinationen (Im = Impuls, kl = kein 
Impuls) dem Prozessor in etwa einer zweihundertneunzigtausendstel 



Die Sprache der Mikroprozessoren 


17 


Sekunde zugeführt werden müssen; das ist keineswegs besonders über¬ 
sichtlich! Ein wenig besser ist da schon die Wiedergabe durch Binärzah¬ 
len in der Mitte. Am besten überschaubar ist die Darstellung durch 
Hexadezimalzahlen rechts, ln dieser Form werden wir dem Mikropro¬ 
zessor künftig mitteilen, was er tun soll. Manchmal müssen wir dabei 
jedoch auf die Einzelbitdarstellung der Binärzahlen zurückgreifen. 


1.3 Ein Blick in den Speicher 

Ab sofort benötigen wir den BASIC-Interpreter nicht. Sollte er geladen 
sein, schalten wir den Computer am besten aus und einige Sekunden 
später wieder ein. Es meldet sich der Monitor 1Z-013A. Das ist der 
Urlademonitor, ein äußerst wichtiges Hilfsprogramm. Es ist in einem 
ROM (read only memory) untergebracht, einem Speicherbaustein, aus 
dem man nur herauslesen, in den man aber nicht hineinschreiben kann 
(außer bei der Herstellung). 

Unter der Meldung des Monitors sehen wir am linken Rand ein 
Sternchen, das Bereitschaftszeichen des Monitors, und daneben den 
schon von BASIC her bekannten Cursor. 

Auch das Monitorprogramm (nicht zu verwechseln mit dem Bild¬ 
schirmgerät) ist ein Maschinenprogramm. Es bewirkt zweierlei: 1. Es 
versetzt das Computersystem beim Einschalten in den erforderlichen 
Anfangszustand, so daß der Anlauf nicht nach irgendeinem wirren 
Muster erfolgt, das sich beim Einschalten gerade so oder so eingestellt 
hat. 2. Es enthält eine Fülle nützlicher Unterprogramme, die den 
Umgang mit dem Computer sehr vereinfachen. Wir werden einen Teil 
dieser Routinen für unsere Zwecke benutzen. 

Das Monitorprogramm ist 4 KB lang und belegt die Speicherplätze 
0000 bis OFFF. Wir können es ohne Schwierigkeit sichtbar machen. Wir 
benutzen dazu den im Handbuch nicht aufgeführten ROM-Monitor-D- 
Befehl. Tippen Sie ein DOOOO(CR), und Sie sehen die Inhalte der 
Speicherstellen 


0000 

0008 

0010 

0001 

0009 

0011 

0002 

000A 

0003 

000B 

0004 

oooc 

0005 

000D 

0006 

000E 

0007 

000F 







0098 

0099 

009A 

009B 

009C 

009D 

009E 

009F 
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Wenn Sie nun den Befehl DOFCO geben, sehen Sie den letzten Teil des 
Monitorprogramms und danach je vier Zeilen FF, 00, FF usw. In 1038 ... 
103A steht jedoch C3 8D 03 - ein wichtiger Befehl - eingeschrieben. 
Dies ist der Arbeitsbereich des Monitors, ein Speicherbereich, in dem 
veränderliche Werte stehen, mit denen der Monitor arbeitet. 

Nach Dl200 sehen wir (von vereinzelten Ausnahmen abgesehen) 
abwechselnd je vier Zeilen FF und vier Zeilen 00. Diesen Bereich 
werden wir für die Unterbringung unserer Daten benutzen. 


1.4 Veränderung des Speicherinhalts 

Zur Veränderung der Speicherinhalte benutzen wir den auf Seite 149 
des Handbuchs beschriebenen M-Befehl. Versuchen Sie, damit nach 
1200 34 und nach 1201 56 einzugeben. Ganz gleich, ob Sie nun Dl 1A0 
oder DilB0 anfordern, in den beiden angesprochenen Speicherstellen 
stehen die eingegebenen Werte. 



2 

Erste Benutzung des Akkumulators 


Wir schreiben nun unsere ersten einfachen Maschinenprogramme. 
Dazu müssen wir wissen, daß unser Mikroprozessor in sich (also neben 
dem bisher besprochenen Speicher) rund 20 Speicherstellen besitzt, die 
Register genannt werden und deren meiste 8 bit bereit sind. Das 
wichtigste dieser Register ist der Akkumulator (abgekürzt A), das 
Hauptrechenregister. 


2.1 Laden mit einer Zahl, 

Laden von und nach Speicherstelle 

Wir merken uns zunächst folgende Befehle: 

LD A,n Lade den Akku mit einer Zahl n. (Weniger fachgerecht: 
Speichere die Zahl n in den Akku ein.) 

LD A,(nn) Lade die in der Speicherstelle nn stehende Zahl in den 
Akku. 

LD (nn),A Lade die im Akku stehende Zahl in die Speicherstelle mit 
der Adresse nn. 

n ist dabei der Inhalt eines Bytes, eine zweistellige Hexadezimalzahl. 
Beispiele: 

LD A,A 7 
LD A,( 1200) 

LD (1202),A 


Zur Bedeutung der drei Bestandteile dieser Befehle merken wir uns das 
Schema WAS - WOHIN - WOHER: 
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WAS soll geschehen? 

WOHIN mit der zu verarbeitenden Zahl (Operand)? 

WOHER soll der Operand genommen werden (bzw. wer soll als Ope¬ 
rand genommen werden)? 

Unser erstes Programm soll die Zahl BF in den Akku laden und nach 
1200 abspeichern; dann Akku mit 8E laden und nach 1201 abspeichern. 
Abschließend soll der in 1200 stehende Wert (nämlich BF) in den Akku 
geholt werden und nach 1202 und 1203 abgespeichert werden. 

Die Aufgabe ist ganz einfach zu lösen. Wir notieren der Reihe nach 

LD A,BF 
LD (1200),A 
LD A,8E 
LD (1201),A 
LD A,( 1200) 

LD (1202),A 
LD (1203),A 
HALT 

Der letzte Befehl, HALT, ist nötig, damit der Prozessor nach Ablauf 
unseres Programms nicht unkontrolliert nach Maßgabe zufällig im 
Speicher stehender Zahlen weiterarbeitet, sondern sogleich seine 
Arbeit beendet. Wir werden schon bald einen bequemeren Programm¬ 
abschluß kennenlernen. 

Damit der Prozessor dieses Programm abarbeiten kann, muß er es in 
einer für ihn «verständlichen» Form verfügbar haben; man muß es ihm 
«eingeben». Daraus ergeben sich sofort zwei Fragen: 

1. In welcher Form kann oder muß man das Programm eingeben? 

2. In welchen Speicherbereich soll es eingegeben werden? 

Zu 1: Wir schrieben unsere Befehlsliste in Form von Mnemonics, das 
sind leicht merkbare Kürzel (griech. mneme: Gedächtnis). Diese wer¬ 
den von einem Computer nicht ohne weiteres verstanden und müssen 
erst in eine ihm gemäße Form übersetzt werden. Dieser Vorgang heißt 
Assemblieren. Es gibt hochkomfortable Programme (Assembler), die 
das können. Sie sind nicht ganz billig und für einen Anfänger gar nicht 
leicht zu bedienen. Wir gehen ganz zünftig vor und erlernen zunächst 
das Assemblieren von Hand. Dazu benötigen wir Tabellen, die uns zu 
jedem Mnemonic den zugehörigen Opcode, eine Hexadezimalzahl, nen- 
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nen. (Siehe Anhang B, Literaturverzeichnis.) Die Opcodes der oben 
benutzten Befehle sind: 


LD 

A,n 

3E 

LD 

A,(nn) 

3A 

LD 

(nn),A 

32 

HALT 

76 


Es fehlen nun noch die Angaben über Operanden und Adressen. Einfa¬ 
che Operanden werden einfach angefügt. Aufpassen müssen wir bei den 
vierstelligen Adressen. Zunächst merken wir uns, daß man das höher¬ 
wertige Byte (mit dem Stellenwert 256) mit MSB (most significant byte) 
und das niederwertige mit LSB (lower significant byte) bezeichnet. 
Beispiel: In 5A6F ist MSB = 5A, LSB = 6F. John von Neumann fand 
heraus, daß eine CPU etwas schneller arbeiten kann, wenn man ihr 
zunächst das LSB und dann erst das MSB darbietet. LD A,(5A6F) wäre 
demnach zu codieren 3A 6F 5A. Diese Vertauschung muß man sich ein 
für allemal einprägen; sie wird nicht nur beim Z80 angewendet. 

Zu 2: Der Z80(A) wird dieses Programm in rund einer fünfzigtausend¬ 
stel Sekunde abarbeiten. Kein Mensch wäre in der Lage, ihm diese 
Befehle in angemessener Zeit in einem Direktmodus zuzuführen. Des¬ 
halb geben wir die Befehle sozusagen auf Vorrat in den Speicher ein, von 
wo sie sich die CPU ohne Schwierigkeit in kürzester Zeit holen wird. 

Für Maschinenprogramme im Clean Computer steht uns ein sehr 
großer Speicherbereich zur Verfügung, von 1200 bis CFFF. Das sind fast 
48 KB, genauer: 48 640 Bytes. Wir wollen mit einprägsamen Adressen 
arbeiten und beginnen daher unser erstes Maschinenprogramm bei 
Adresse 2000. (Als Speicherbereich für die zu verarbeitenden Daten 
hatten wir 1200... 1203 gewählt). Damit können wir endgültig co¬ 
dieren: 


F’2. 1. 

1 





2000 

LD 

A , BF 

3E 

BF 


2002 

L.D 

(1200) f A 

32 

00 

12 

2005 

LD 

A,8E 

3E 

8E 


2007 

LD 

(1201),A 

32 

01 

12 

200A 

LD 

A„(1200) 

3A 

00 

12 

200D 

LD 

(1202),A 

32 

02 

12 

2010 

LD 

(1203),A 

32 

03 

12 

2013 

HALT 


76 
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Machen Sie sich unbedingt klar: 

1. Die links angegebenen Speicherplätze errechnen sich aus der Start¬ 
adresse, die fortlaufend um die Anzahl der Bytes eines jeden Befehls 
erhöht wird. 

2. Das Programm ist 20 Bytes lang. Bitte zählen Sie das nicht nach, 
sondern errechnen Sie es aus Start- und Endadresse. 

3. Bei 2-Byte-Operanden wird die Reihenfolge von MSB und LSB ver¬ 
tauscht. 

4. Zu gleichen Mnemonics gehören gleiche Opcodes. 

In unserer Aufstellung steht das eigentliche Maschinenprogramm in 
den (bis zu) drei Kolonnen rechts. Es besteht aus Zahlen, die den 
erforderlichen Speicherzustand beschreiben. Wir tippen sie in schon 
bekannter Weise ein: M2000, 3E, BF, 32, 00, ... usw. Zum Schluß 
drücken wir SHIFT-BREAK. Als letztes müssen wir das Programm 
starten, d. h. den Mikroprozessor veranlassen, sich der Reihe nach die 
Befehle aus dem Programmspeicher zu holen und abzuarbeiten. Das 
bewirkt der JUMP-Befehl J2000 (siehe Handbuch). In etwa einer fünfzig¬ 
tausendstel Sekunde ist alles geschehen. Wir merken davon nichts und 
stellen nur verwundert fest, daß der Computer «hängt» und auf (fast) 
keine Taste mehr reagiert. Keine Panik, das ist richtig so, denn wir 
hatten ja das Programm mit HALT beendet, und der Prozessor hat seine 
Arbeit eingestellt. Aus dem groben Halt-Status kommen wir nur durch 
einen groben Eingriff wieder heraus: Auf der Rückseite unseres MZ-700 
sitzt etwa 11 cm vom linken Gehäuserand entfernt ein kleiner vierecki¬ 
ger weißer Knopf, die Reset-Taste. Ihn drücken wir. Mit einem Piepton 
meldet sich der Monitor wieder, und das Prompt-Sternchen und der 
Cursor sind wieder da. fetzt fordern wir mit Dl200 einen Speicheraus¬ 
zug an und überzeugen uns, daß das Programm genau nach Plan 
abgelaufen ist. Die erste Zeile des Hexdumps muß jetzt beginnen: 1200 
BF 8E BF BF. Vergleichen Sie das mit der Zielsetzung unseres ersten 
Programms. 



Erste Benutzung des Akkumulators 


23 


2.2 Variante mit Einsprung in den Monitor 

Wandeln Sie P2.1.1 in mehrfacher Weise ab; ändern Sie die zu verarbei¬ 
tenden Zahlen (Operanden); verändern Sie in sinnvoller Weise die 
Adressen; fügen Sie auch noch einige Zeilen an! Und dann wollen wir 
die Blockade durch HALT vermeiden, wozu wir etwas weiter ausholen 
müssen: Wir hatten schon gehört, daß jeder Mikroprozessor zum 
Anlaufen ein Hilfsprogramm benötigt, das ihm vorschreibt, wie er das 
Computersystem initialisieren soll. Der Z80 ist so konstruiert, daß er 
den ersten Befehl dieses Anlaufprogramms in der Speicherstelle 0000 
sucht. Wir veranlassen jetzt am Schluß unseres Programms die CPU, 
das Computersystem neu zu initialisieren, indem wir einen Sprung 
(jump) an die Speicherstelle 0000 befehlen. Statt HALT setzen wir nun 

mnemonisch codiert: 

JP 0000 C3 00 00 

Nach Abarbeiten des Programms springt der Prozessor an den Anfang 
des Urladeprogramms und läßt den Computer neu anlaufen. Der Spei¬ 
cherinhalt wird dabei nicht verändert. 

Wenn alles wunschgemäß funktioniert, fordern Sie bitte noch einmal 
D0000 an. Sie können jetzt schon den Anfang des Monitorprogramms 
deuten: 


0000 JP 004A C3 4A 00 
0003 JP 07E6 C3 E6 07 
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t =l t =1 t= l t =l l =l t =l t =l l =l l T=l l ^1 t =l t =l t =l t =l t =l t =1 t =l l =1 

Etwa so beginnt der Monitor 
Reset 

0000 Springe nach 004A 

004A Richte Stapel ab 10EF ein (vgl. Kapitel 10) 

004D Denke an mögliche Steuerimpulse von Drucker, Kassetten¬ 
rekorder usw. 

004F Versetze die Bausteine, die z. B. die Tastatur abfragen, in die 
richtige Arbeitsstimmung. 

0078 Lösche den Bildschirm. 

007D Mache den Hintergrund blau und die künftige Schrift weiß. 

009B Schreibe auf den Bildschirm ** MONITOR 1Z-013A ** 
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Weitere 8-bit-Register 


Das wichtigste Register der CPU ist der Akkumulator. Daneben gibt es 
weitere, z. B. B, C, D, E, H und L. Sie können nicht alles, was der Akku 
kann, sind aber dennoch sehr wichtig und nützlich. 


3.1 Die Befehle LD r,r’ und ihre bitweise Codierung 


Lassen Sie uns zunächst Daten zwischen den 8-bit-Registern hin- und 
hertransportieren. Dazu dient der LOAD-Befehl in der Form LD r,r', was 
bedeutet, daß der Inhalt des Registers r' in das Register r kopiert werden 
soll. Konkret sehen also die Mnemonics so aus: LD B,C oder LD A,H 

oder LD L,H usw. Der Opcode für diese Befehlsgruppe lautet 01., 

worin jeder Punkt ein Bit bedeutet. Wir müssen nun bitweise program¬ 
mieren. Zunächst die Codierung der genannten Register: 

B: 000 C: 001 D: 010 E: 011 

H: 100 L: 101 A: 111 


Sie haben richtig bemerkt, daß man in 3 bit ja 8 Werte codieren kann, 
daß hier aber der Code 110 fehlt. Wir werden ihn erst später in einem 
anderen Zusammenhang kennenlernen. 

Wenn wir beispielsweise LD B,A codieren wollen, müssen wir so 
Vorgehen: 01 000 111,01 für LD r,r', 000 für B und 111 für A. Das ordnen 


wir zu zwei Halbbytes (Nibbles): 0100 0111 und lesen es hexadezimal 

]A7 

A3.1.1 Codieren Sie ebenso a) LD D,A; b) LD B,C; c) LD C,B; d) LD 


H,L; e) LD L,H. < > o • 

A3.1.2 Wenn man die Inhalte zweier Speicherstellen bzw. Register 
vertauschen will, benötigt man einen Zwischenspeicher. Vertauschen 
Sie die Inhalte von H und L, und benutzen Sie als Zwischenspeicher A! 
(Lösungen und Lösungsvorschläge finden Sie im Anhang C). 


V' A £> 




V' l j (o (JO 

U U t r r 2 f- FE 

A,H 

U h L- C» • r 

u. 0 } li A C ' 
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3.2 Addition, Subtraktion, Carry-Flag 


Der Befehl ADD Aj veranlaßt die CPU, den Inhalt des Registers r 
zum Akku zu addieren. Dort steht dann auch das Resultat. Der Opcode 
hierfür ist 10000. 


■> ttfco WÜ ■ 

PÄ'i *" * c.-r. oo •>: ^ <V1h 

A3.2.1 Codieren Sie aj ÄDD A,Ä) b) ADD A,B; c) ADD A,C; d) ADD 


,(?0w 400CWO,. 

A PC oo h 


A,D! 

P3.2.2 Addition von D nach A 

Die Inhalte der Speicherstellen 1200 und 1201 sollen addiert und die 
Summe nach 1202 abgelegt werden. Wir holen dazu (1200) - das ist der 
Inhalt von 1200 - in den Akku und transportieren ihn weiter in das 
Register D. Dann laden wir den Akku mit (1201) und addieren, um 
schließlich die Summe in 1202 abzulegen. Das Programm sieht so aus: 



LD 

0.4 - fff- 

LD 


LD 

ce QAof--&2 

ADD 

LD 


JP 


A,{ 12.00) 

JA 

oo *\l 

D,A 

5? 


A,( 12.01) 

3 A 

0 a M 

A,D 

§ J 


(1202),A 

3 a. 

02. 

0000 

c'3 

o £ c>ö 


es 

4A 

•1 K ^ 


A3.2.2 Codieren Sie dieses Programm mit Beginn ab 2000. 

Stimmt Ihre Lösung mit dem Hexdump L3.2.2 überein? 

Wenn alles richtig ist, tippen Sie das fertige Programm in den Spei¬ 
cher ein, speichern mit Ml200 zwei Summanden - z. B. 13 und 24 - ein 
und rufen das Programm mit J2000 auf. Der mit Dl200 angeforderte 
Speicherauszug zeigt, daß der Computer richtig gerechnet hat: 1200 13 
24 37.. .. Wir lassen weitere Beispiele rechnen und stutzen: 68 + 59 = 
CI. Wieso das? Lassen Sie uns nachrechnen: 8 + 9 = 17, hexadezimal 
ein Sechzehner und ein Einer; also muß das Ergebnis mit 1 enden. 6 + 5 
= 11, mit Übertrag 12, geschrieben C. Ergebnis als CI. Rechnen Sie 
weitere Aufgaben, schrecken sie nicht vor Hexadezimalzahlen zurück, 
prüfen Sie die Ergebnisse nach, wie eben vorgeführt! 

Noch ein Beispiel: 9A + AC ergibt 46; das stimmt doch wohl nicht! 
Rechnen wir nach: 10 + 12 = 22, also ein Sechzehner und sechs Einer; 
letzte Stelle 6 und dazu Übertrag merken. 9 + 10 + 1 = 20, also ein 
Sechzehner und vier Einer. Richtiges Ergebnis 146. Wo ist nur der 
Übertrag geblieben? 
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Hier muß verraten werden, daß es auch noch ein F-Register in der 
CPU gibt, ein Flag-Register. (Es hat nichts mit der fehlenden Codierung 
110 von 3.1 zu tun). Eine Flagge ist ein Bit, das anzeigt, ob ein 
bestimmter Verarbeitungszustand eingetreten ist oder nicht. Das F- 
Register ist wie die bisher genannten 8 bit breit, könnte also bis zu 8 
Flags repräsentieren. Es werden jedoch nicht alle 8 bit so genutzt. Eins 
davon ist das Carry -Bit (oder Carry-Flag, abgekürzt CY) ; es zeigt den 
Übertrag an. Der Übertrag in unserem letzten Beispiel ging nicht 
verloren, sondern wurde vom Prozessor sehr wohl für eine spätere 
Berücksichtigung «im Gedächtnis» behalten. 

Man kann das Carry-Bit vom Programm aus manipulieren. Man setzt 
es mit dem Befehl SCF (set carry flag, Opcode 37), und man komple¬ 
mentiert es (d. h., man setzt es auf 1, wenn es auf 0 war - oder 
umgekehrt) mit dem Befehl CCF (3F). 

Wir merken uns gleich noch einen nützlichen Befehl; er heißt NOP 
(no Operation) mit dem Opcode 00. Er bewirkt nichts, hält aber Platz frei 
für einen Befehl, der vielleicht später einmal in das Programm eingefügt 
werden soll. 


Addition mit Carry-Flag 

Neben ADD gibt es Additionsbefehle, die in die Addition den Übertrag 
von einer vorhergehenden Addition einbeziehen. Wir lernen den ersten 
kennen: 

mnemonisch: codiert: 

ADCAj 10001... 

Wir gehen aus von P3.2.2, stellen uns jedoch vor, daß die CPU soeben 
eine Addition durchgeführt hat, aus der möglicherweise ein Übertrag zu 
berücksichtigen ist. Wir simulieren das, indem wir vor der Addition 
Carry setzen. Für eine spätere Variante lassen wir ein NOP als Platzhal¬ 
ter folgen. Außerdem üben wir das Codieren, indem wir statt des D- 
Registers das L-Register benutzen: 


LD 

A,( 1200) 

3A 

LD 

L,A 

& 

LD 

A,( 1201) 

ZA cm *1 

SCF 



NOP 


€ D 



28 


Weitere 8-bit-Register 


Ae*#* $ ADC A,L <§\D 

LD (1202),A H2 02 < l 

JP 0000 CH ®o 

A3.2.3 Codieren Sie diesen Programmentwurf. 

Lassen wir das fertige Programm zur Probe mit den Werten des 
vorigen Beispiels ablaufen, so erhalten wir «richtig falsch» 13 + 24 = 
38; richtig deswegen, weil ja ein virtueller Übertrag von einer früheren 
Addition mitaddiert wurde. Um das zu vermeiden, müßten wir Carry 
4 ^ löschen (auf null setzen). Wir werden später Möglichkeiten kennenler¬ 

nen, wie das mit einem einzigen Befehl geschehen kann, nehmen 
zunächst einen zweiten Befehl in Kauf, um den Vorgang verständlicher 
zu machen. Wir setzen Carry wie bisher, ersetzen aber das folgende 
NOP durch CCF, komplementieren also das gesetzte Carry-Flag. Schon 
erhalten wir wieder 13 + 24 = 37. Bitte spielen Sie mit den aufgezeigten 
Möglichkeiten. Probieren Sie viele Beispiele aus, und schrecken Sie 
nicht vor echten Hexadezimalzahlen zurück. Sie können sich mit ihnen 
gar nicht besser vertraut machen als durch Ausprobieren vieler Mög¬ 
lichkeiten, die Sie sich selber ausdenken wollen. 


3.3 Mehrstellige Addition und Subtraktion 

Sech ss teilige Hexa dezim aladdi tion 

Wir wollen nun zwei 3-Byte-Zahlen addieren. Das Ergebnis soll mög¬ 
lichst übersichtlich im Hexdump erscheinen. Deshalb benutzen wir die 
Speicherstellen 


1200 1201 1202 
1208 1209 120A 
1210 1211 1212 

Wenn wir also 123456 + 234567 = 3579BD berechnen wollen, soll der 
Speicherauszug so aussehen: 

1200 12 34 56 . 

1208 23 45 67 . 

1210 35 79 BD. 
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Wir addieren dazu zuerst die beiden LSBs mit ADD, dann die beiden 
mittleren Bytes und zum Schluß die beiden MSBs mit ADC. 

A3.3.1 Versuchen Sie, das entsprechende Programm aufzustellen! 

Wenn Sie die Aufgabe richtig gelöst haben, dann spielen Sie wieder. 
Benutzen Sie zur Addition auch einmal ein anderes Register, z. B. E oder 
H. Das Programm erscheint Ihnen für ein so einfaches Problem zu lang? 
Warten Sie's ab! Wir sind ja noch ganz am Anfang. Wir werden später 
mit kürzeren Programmen sechzehnstellig addieren. 

Sechsstellige Dezimaladdition 

Wir haben ganz bewußt mit der Hexadezimaladdition begonnen, denn 
unser Prozessor (und andere auch) hat nun einmal ein hexadezimales 
Innenleben. Er kann auch eine dezimale Summe bilden, doch ist das für 
ihn ein Sonderfall. Eine Voraussetzung für die korrekte Durchführung 
der Dezimaladdition ist, daß dem Prozessor nur die Dezimalziffern 0 bis 
9 dargeboten werden. Nun rechnet die CPU (LSBs des vorigen Beispiels) 
zwar wieder 56 + 67 = BD. Läßt man aber den Befehl DAA (decimal 
adjust accumulator, Opcode 27) folgen, so wird der Inhalt des Akkumu¬ 
lators Stelle für Stelle in eine Dezimalzahl umgewandelt. Aus D wird 
13, also eine 3 mit Übertrag zum linken Nibble, so daß sich dort 5 -f 6 + 
1 = 12 ergibt, also eine 2 mit Übertrag (im Carrybit). Dazu muß noch 
eine zweite Voraussetzung erfüllt sein: Es muß tatsächlich eine arith¬ 
metische Operation durchgeführt worden sein, damit - vom Benutzer 
unbeeinflußt - im F-Register das H-Bit (Halbbytecarry bei Übertrag 
vom 3. zum 4. Bit) richtig gesetzt wurde. Das fertige Programm mit 
Addition von H nach A sieht so aus: 


P3.3.2 


2O00 

L.D 

A,(1202) 

3A 

02 

12 

2003 

LD 

H ? A 

67 



2004 

LD 

A,(120A) 

3A 

0A 

12 

2007 

ADD 

A„ H 

84 



2008 

DAA 


27 



2009 

L..D 

(1212),A 

32 

12 

12 

200C 

LD 

A,(1201) 

3A 

01 

12 

200F' 

LD 

H, A 

67 



20 10 

LD 

A„(1209) 

3A 

09 

12 

20.13 

ADC 

A, H 

8C 



2014 

DAA 


27 
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2015 

LD 

(1211 ) , A 

32 

11 

12 

2018 

LD 

A,(1200) 

3A 

00 

1.2 

201B 

LD 

H, A 

67 



20 IC 

LD 

A,(1208) 

3A 

08 

12 

201F 

ADC 

A, H 

8C 



2020 

DAA 


27 



2021 

LD 

(1210),A 


10 

12 

2024 

JP 

0000 

C3 

00 

00 


Probieren Sie auch dieses Programm reichlich aus, aber zerstören Sie es 
nicht. Wir verwenden es sogleich als Gerüst eines neuen: 

Sechsstellige Subtraktion 
Die beiden hierzu neu benötigten Befehle sind 

SBC A,r mit der Codierung 10011... und 

SUB r mit der Codierung 10010... 

(Bei R. Zaks [2] statt dessen SUB A,r) 

Codieren Sie SUB A,H und SBC A,H und ersetzen Sie (in P6] in 2007 84 
durch 94 und in 2013 und 201F jeweils 8C durch 9C. 

A3.3.3 Wie gefallen Ihnen die Rechenergebnisse? Was haben wir 
unschön gemacht? Machen Sie es besser! Vergessen Sie nicht, auch 
hexadezimal zu subtrahieren; ersetzen Sie dazu die DAAs durch NOPs! 

Rechnen Sie dann einmal 000000 - 000001. Nach allem, was wir 
bisher gehört haben, bedeutet das Ergebnis FFFFFFh = 16777215d, 
während offenbar -1 richtig ist. Hier lebt man mit einer Zweideutig¬ 
keit, die zu interpretieren Sache des Programmierers ist: Wenn das 
höchst Bit einer Zahl gesetzt ist (im Beispiel Bit 23), faßt man sie häufig 
als negativ auf. Wir kommen darauf zurück, merken uns aber schon, 
daß man von einer positiven Zahl zur entsprechenden negativen 
gelangt, indem man ihre Bits komplementiert (aus 0 mach 1, aus 1 
mach 0) und dann 1 addiert. Zu unserem Beispiel: 

+ 1 = 0000 0000 0000 0000 0000 0001 

-1 = 1111 1111 1111 1111 1111 1110 + 1 

= F F F F F F 
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Einige 16-bit-Register, insbesondere HL 


Die Register B, C, D, E, H und L lassen sich mit einfachen Befehlen als 
16-bit-Doppelregister ansprechen: BC, DE, HL. Die Bezeichnungsweise 
entspricht der normalen Schreibweise der Zahlen: Das MSB befindet 
sich in B, D oder H und das LSB in C, E oder L. 


4.1 Die Befehle LD dd,nn 

Die Befehle dieser Gruppen laden das jeweils codierte Doppelregister dd 
mit der vierstelligen Zweibytezahl nn. Ihre Codierung ist OOddOOOl, 
worin für dd folgende Codes einzusetzen sind: 

BC: 00 DE: 01 HL: 10 

Wir überzeugen uns von der Richtigkeit des Gesagten, indem wir z. B. 
das HL-Register mit ABCD laden und dann den Inhalt von H über A 
nach 1200 und den Inhalt von L über A nach 1201 transferieren. Wir 
lassen sofort ein zweites Testprogramm folgen, das dasselbe mit der 
Zahl 6789 bewirkt: 

A4.1.1 Wo steht was im HL-Register? 


a) ab 2000 

b) ab 200E 

LD 

HL,ABCD 

LD 

HL,6789 

LD 

A,H 

LD 

A,H 

LD 

(1200),A 

LD 

(1200),A 

LD 

A,L 

LD 

A,L 

LD 

(1201),A 

LD 

(1201),A 

JP 

0000 

JP 

0000 


Codieren Sie und vergleichen Sie mit L4.1.1; rufen Sie dann den ersten 
Teil mit J2000 auf und kontrollieren Sie den Hexdump. Machen Sie 
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Einige 16-bit-Register, insbesondere HL 


dasselbe mit J200E und überzeugen Sie sich, daß alles nach Wunsch 
verläuft. Vielleicht fügen Sie noch einen dritten Abschnitt an? 
c) Vereinfachung? 


4.2 Die Befehle LD (nn),dd und LD dd y (nn) 

Die Befehle dieser Gruppen kopieren den Inhalt eines Doppelregisters 
in zwei benachbarte Speicherstellen bzw. umgekehrt. Die zugehörigen 
Opcodes sind ED OlddOOll bzw. ED 01 dd 1011. 

Der folgende Dreizeiler holt die Inhalte von 1200 und 1201 in das BC- 
Register und legt sie dann in 1202 und 1203 ab. (Eine Tafel Schokolade, 
die man aus dem Schrank holt, ist nicht mehr im Schrank. Holt man 
eine Zahl aus dem Speicher oder einem Register, so bleibt sie im 
Ursprung erhalten: Die Zahl wird kopiert.) 


P4.2. 1 


2000 

LD 

BC,(1200) 

ED 

4B 

00 12 

2004 

LD 

(1202),BC 

ED 

43 

02 12 

2O0B 

JP 

0000 

C3 

00 

00 


Sie haben richtig beobachtet: Die Maschinenbefehle des Z80 können 
bis zu vier Bytes lang sein. 

Das HL-Register bietet gegenüber den anderen 16-bit-Registern man¬ 
cherlei Vorzüge. So gibt es zu den beiden neuen LD-Befehlen zwei 
spezielle Varianten für das HL-Register: 

LD (nn),HL (Opcode 22) 

LD HL,(nn) (Opcode 2A) 

A4.2.2 Führen Sie a) mittels DE-Register, b) mittels HL-Register folgen¬ 
den Speicherzustand herbei: 


1200 01 23 45 67 



Einige 16-bit-Register, insbesondere HL 
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4.3 Vierstellige Hexadezimaladdition 

Sie werden sicherlich fragen, wozu denn nun vierstellig, wo wir doch 
schon sechsstellig addiert haben. Antwort: Hier sollen alle vier Stellen 
auf einmal addiert werden. Dazu zwei neue Befehle zur Auswahl: 

ADD HL,ss OOsslOOl 

ADC HL,ss ED OlsslOlO 

Für ss gilt die gleiche Codierung wie für dd (vgl. Abschnitt 4.1). Die 
Summanden sollen in von Neumannscher Anordnung in 1201 und 1200 
und in 1209 und 1208 bereitgestellt sein. Ablage des Ergebnisses nach 
1211 und 1210: 

P4.3.1 


2000 

LD 

HL,(1200) 

2A 00 

12 

2003 

LD 

DE,(1208) 

ED 5B 

08 12 

2007 

ADD 

HL, DE 

19 


2008 

LD 

(1210),HL 

22 10 

12 

200B 

JP 

0000 

C3 00 

00 


A4.3.2 Schreiben Sie ein möglichst ähnliches Programm, bei dem die 
Zahlen an denselben Stellen, jedoch in gut lesbarer Anordnung (MSB 
links, LSB rechts) vorgegeben werden. 

A4.3.3 Subtrahieren Sie P4.3.1 entsprechend zwei vierstellige Zahlen 
ohne Carry voneinander. Suchen Sie den benötigten Befehl im Hand¬ 
buch! 

A4.3.4 Verachtfachen Sie Zahlen < 2000h durch dreimaliges Verdop¬ 
peln. 


4.4 Indirekte Adressierung 

Laut Krimi geht man bei der Übergabe eines Lösegeldes meistens so vor, 
daß man den Überbringer zu einem angeblichen Treffpunkt bestellt, 
ihm dort aber die Nachricht zukommen läßt, daß er sich anderswohin 
begeben möge. Genauso ist es bei der indirekten Adressierung: Man 
«sagt» dem Prozessor, wo er die endgültige Adresse findet. Dazu 
benutzt man häufig das Doppelregister HL. Drei neue Befehle: 
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LD (HL),A kopiert den Inhalt des Akkus in die in HL angegebene 
Speicherstelle. 

LD (HL),n lädt die Speicherstelle, deren Adresse in HL steht, mit der 
Konstante n. 

INC HL erhöht den Inhalt von HL um 1. 

Die Codierung entnehmen Sie bitte dem Handbuch. Übrigens, (HL): 
110 ist die fehlende Codierung von 3.1. 

A4.4.1 Der Speicherbereich von 1200 bis 1207 soll mit Hilfe der neuen 
Befehle (und mit viel Fleiß) auf null gesetzt werden. Versuchen Sie's! 
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Bedingte und unbedingte relative Sprünge 


Man unterscheidet Sprünge, die nur dann ausgeführt werden, wenn eine 
bestimmte Bedingung erfüllt ist, und solche, die unabhängig von einer 
Bedingung immer ausgeführt werden. Sie heißen “bedingte» bzw. 
«unbedingte» Sprünge. Ist nicht das Sprungziel angegeben, sondern die 
Sprungweite, heißen sie «relative» Sprünge. 


5.1 Der Superbefehl D/NZ 

Sie werden in L4.4.1 mit Recht die häufige Wiederholung mancher 
Befehle als unschön empfunden haben. Wir wollen jetzt den Speicher¬ 
bereich von 1200 bis 129F auf null setzen, jedoch nicht so primitiv. Wir 
benutzen dazu den überaus geschickt konstruierten Befehl DJNZ 
(decrement and jump if not zero). Er arbeitet mit dem B-Register 
zusammen. 

Rechnen Sie nach: Es sind 160 Speicherstellen auf null zu setzen, also 
hexadezimal A0. Wir laden das B-Register mit A0, HL mit 1200 und 
lassen LD (HL),00, INC HL und den Befehl DJNZ folgen. Er vermindert 
den Inhalt des B-Registers um 1, und wenn es noch nicht den Wert null 
erreicht hat, veranlaßt er den Prozessor, das Ganze so lange zu wieder¬ 
holen, bis B = 0. Damit läßt sich unser Ziel wie folgt erreichen: 


F’5. 1. 
2000 

1 

LD 

B, AO 

06 

AO 

2002 

LD 

HL,1200 

21 

00 12 

2005 

LD 

(HL),00 

36 

00 

2007 

INC 

HL 



2008 

DJNZ 


10 

. - 

200A 

JP 

0000 

C3 

00 00 
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5.2 Die Codierung der Sprungweite 

Wir haben nun zweierlei zu überlegen: 

1. Wohin, zu welchem Befehl soll der Prozessor in P5.1.1 nach Anwei¬ 
sung 2008 springen, um den Programmablauf fortzusetzen, wenn B 
noch nicht gleich null geworden ist? 

2. Wie ist dieser Sprung zu codieren? 

Zu 1. (Mindestens) eine Speicherstelle wurde auf null gesetzt, und (HL) 
wurde um eins erhöht. Wenn noch nicht der ganze Speicherbereich auf 
null gesetzt wurde, so ist jetzt die nächste Speicherstelle auf null zu 
setzen. Es muß also nach 2005 zurückgesprungen werden. Man nennt 
eine solche Programmstruktur «Schleife». Sie wird hier ausgelöst durch 
den bedingten Sprung DJNZ, der nur dann erfolgt, wenn B 4= 0. Man sagt 
auch, daß in 2008 eine «Verzweigung» erfolgt. 

Zu 2. In Übereinstimmung mit zahlreichen Assemblern und Disas¬ 
semblern geben wir beim Mnemonic die Zieladresse «absolut» an: 
DJNZ 2005. Im Maschinenprogramm (Objektcode) muß dem Prozessor 
jedoch die relative Sprungweite mitgeteilt werden. Dazu muß man 
wissen, daß während der Bearbeitung eines Befehls der Programmzäh¬ 
ler, ein bisher noch nicht erwähntes Register der CPU, bereits auf den 
nächsten zeigt; bei der Bearbeitung des Befehls 2008 also schon auf 
200A. Wir berechnen damit die Sprungweite so: 200A - 2005 = 05. 
Nun erfolgt dieser Sprung aber rückwärts; relative Sprungweite also 
-05. Leider können wir dem Prozessor das Minuszeichen nicht direkt 
eingeben, sondern müssen - wie zu P3.3.3 erklärt - so rechnen: 

+5 = 0000 0101 

-5 = 1111 1010 + 1 = 1111 1011 = FB. 

Die Programmzeile 2008 lautet also vollständig 

2008 DJNZ 2005 10 FB 

Wir hätten damit die wohl größte Schwierigkeit, die beim Programmie¬ 
ren in Maschinensprache auftritt, bewältigt. Sie täten gut daran, die 
angezeigten Schritte sorgfältig nachzuvollziehen. Vielleicht trägt die 
folgende Tabelle noch ein wenig zum Verständnis bei: Von 200A aus ( = 
Absprungadresse + 2 = Programmzählerstand) bewirkt 
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und unbedingte relative Sprünge 

FA = 

-6 

einen Sprung nach 2004 

FB = 

-5 

einen Sprung nach 2005 

FC = 

-4 

einen Sprung nach 2006 

FD = 

-3 

einen Sprung nach 2007 

FE = 

-2 

einen Sprung nach 2008 

FF = 

-1 

einen Sprung nach 2009 

00 = 

0 

einen Sprung nach 200A 

01 = 

41 

einen Sprung nach 200B 

02 = 

+2 

einen Sprung nach 200C usw. 


Vielleicht gefällt Ihnen folgende Anleitung besser: Unterscheiden Sie 
zwischen Vorwärtssprung (in Richtung des allgemeinen Programm¬ 
ablaufs) und Rückwärtssprung (wie in unserem Beispiel). 

Vorwärtssprung (im allgemeinen nicht mit DJNZ!): 
Absprungadresse (Adresse des Sprungbefehls) = 23D3 
PC (program counter, Programmzähler) = 23D5 
Sprungziel (Sprungadresse) = 23EB 
23EB - 23D5 = 16 

Relative Sprungweite (Codierung) = 16. 

Rückwärtssprung: 

Absprungadresse (Adresse des Sprungbefehls) = 2008 

PC = 200A 

Sprungziel = 2005 

(2005 + 100) - 200A = FB 

Relative Sprungweite (Codierung) = FB. 

Da die Sprungweiten in einem einzigen Byte codiert werden, ergibt sich 
folgende Begrenzung: 

Bei Vorwärtssprüngen max. 7F = 127d ; 

Bei Rückwärtssprüngen max. 80 = -128d ; 

min. FF = -ld. 

A5.2.1 Berechnen Sie die Codierung folgender Sprünge: 

a) von 653E nach 65BF 

b) von 653F nach 65BE 

c) von 20A7 nach 2110 

d) von 20CB nach 20BB 
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e) von 32F6 nach 3299 

f) von BFAA nach BE2A 

g) von BFAA nach BF23 

Als Absprungadresse wurde dabei die Adresse des Sprungbefehls ange¬ 
geben. 


5.3 Anwendung: Das kleine Einmaleins 

Wir wollen sogleich den Befehl DJNZ auf ein anderes Problem anwen¬ 
den und Produkte aus dem Bereich des kleinen Einmaleins (bis F ★ F = 
El) berechnen. Den einen Faktor holen wir aus 1200 ins B-Register, den 
anderen aus 1201 ins C-Register. Der Akku wird anfangs auf null 
gesetzt. Dann addieren wir den Inhalt von C so oft zu A, wie das B- 
Register vorschreibt. Das fertige Produkt legen wir in 1202 ab. 


P5. 3. 

1 





2000 

LD 

A P <120Q>^ 

3A 

00 

12 

2003 

LD 

B, A 

47 



2004 

LD 

A, <1201) 

3A 

01 

12 

2007 

L.D 

C,A 

4P 



2008 

LD 

A,C 

3E 

00 


^>200A 
200B 

ADD 

81 



DJNZ 

, , , , 

„ m 

, , 


200D 

LD 

<1202),A 

32 

02 

12 

2010 

JP 

0000 

C3 

00 

00 


A5.3.1 Fragen: 

a) Wohin muß der Rücksprung erfolgen? 

b) Was enthält der Programmzähler beim Absprung? 

c) Wie ist die Sprungweite zu codieren? 

d) Wie lautet Zeile 200B vollständig? 

Das Programm arbeitet zuverlässig, obwohl es einen Denkfehler ent¬ 
hält. Erkennen Sie ihn? Berechnen Sie 0 ★ 9! Das Ergebnis stimmt, und 
doch haben wir falsch gerechnet! Was geschieht im B-Register? Der 
Fehler hebt sich selbst auf, so daß wir im Augenblick darüber hinwegge¬ 
hen wollen. Wir kommen aber schnell darauf zurück. 
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5.4 Weitere Sprungbefehle 

Hier sind vor allem folgende Befehle zu nennen: 

JR C^e mit Opcode 38 
JR NC,e mit Opcode 30 
]R Z,e mit Opcode 28 
JR NZ,e mit Opcode 20 

e bedeutet darin eine Sprungweite, die wie in Abschnitt 5.2 besprochen 
zu codieren ist. Diese relativen Sprünge werden ausgeführt, wenn Carry 
gesetzt - oder nicht gesetzt ist, wenn das Ergebnis der voraufgehenden 
Addition oder Subtraktion null (zero) - oder nicht null war. Das Zero- 
Flag läßt sich aber auch durch einen Vergleich (compare, vergleichen) 
beeinflussen. Der Befehl CP n vergleicht den Inhalt des Akkus mit der 
Konstante n, indem er n von A subtrahiert. Bei Gleichheit ergibt sich 
der Wert null, und Zero-Flag wird gesetzt. Trotz der Subtraktion behält 
der Akku seinen ursprünglichen Wert. 

Mit diesem Wissen kommen wir jetzt auf den Fehler in P5.3.1 
zurück: Wenn vor DJNZ das B-Register auf 0 gesetzt war, wird die 
Schleife (zunächst einmal) durchlaufen. Danach dekrementiert DJNZ 
das B-Register; aus B = 0 wird B = FF. Und dann wird die Schleife 
weitere 255mal abgearbeitet, ln P5.3.1 wurde also statt 0*9 (hexadezi¬ 
mal!) 100 * 9 = 900 gerechnet. Die Überträge gelangten zwar ins Carry, 
wurden dann aber nicht weiter berücksichtigt, so daß nur die nachfol¬ 
genden Nullen übrigblieben. 

A5.4.1 Ergänzen Sie P5.3.1 so, daß bei B = 0 die Schleife überhaupt 
nicht durchlaufen wird. 


Icoc 

CD 

A 
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k 
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Eine bedenkliche Heizungsregelung 



So ähnlich haben wir in P5.3.1 mit null multipliziert. 

NB: °UBH ist die neue, nach dem Kalobiotiker Prof. Unbehagen 
benannte Temperaturskala: 0°UBH ist die Temperatur, bei der sich ein 
1,72 m großer und 72 kg schwerer Nichtraucher am wohlsten fühlt. 
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Unterprogramme (Subroutinen) 


Unterprogramme sind in sich abgeschlossene Programmteile, die im 
allgemeinen häufiger durchlaufen, aber nur einmal geschrieben werden. 
Sie werden im einfachsten Fall mit CALL nn aufgerufen und enden mit 
RET (return). 

Bei CALL (Opcode CD) geschieht folgendes: Der Prozessor «merkt» 
sich die Adresse des an sich folgenden Befehls, vollführt aber einen 
Sprung zur angegebenen Adresse des Unterprogramms. Findet er in 
dessen Verlauf einen RET-Befehl, kehrt er zu der «gemerkten» Adresse 
zurück und arbeitet von dort ab weiter - so als wäre nichts geschehen. 


6.1 Aufruf mit CALL nn 


Um das Konzept der Unterprogramme an einem einfachen Beispiel 
anzuwenden, schreiben wir (wenngleich nicht gerade sinnvoll) P5.3.1 so 
um, daß formal eine Subroutine (2015 ... 2016) entsteht: 


FA. 1. 

1 






LD 

A,(1200) 

3A 

00 

12 

2003 

L.D 

B, A 

47 



2004 

LD 

A,(1201) 

3A 

0.1 

12 

2007 

LD 

C, A 

4F 



2008 

LD 

A, 00 

3E 

00 


200A 

CALL 

2015 

CD 

15 

20 

200D 

DJNZ 

200A 

10 

FB 


20OF 

LD 

(1202),A 

"TO 

02 

12 

2012 

JP 

0000 

C3 

00 

00 

2015 

ADD 

A, C 

81 



2016 

RET 


C9 




Die Subroutine 2015 wird nun so oft durchlaufen, wie der Inhalt der 
Speicherstelle 1200 angibt. 
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6.2 Betriebssystem, Monitor 

Ein Betriebssystem ist ein Programm, das die einzelnen Komponenten 
eines Computers überwacht und koordiniert. Es besteht aus vielen 
Unterprogrammen, die Einzelaufgaben wie z. B. die Tastaturüberwa¬ 
chung (Tastaturabfrage), Auffinden der nächsten Schreibstelle auf dem 
Bildschirm usw. erledigen. Es ist allgemein üblich, diese Subroutinen 
um des besseren Verständnisses willen mit Kurznamen zu bezeichnen. 
Vom Programm her werden sie jedoch mit ihrer Startadresse aufge¬ 
rufen. 

Der schon mehrfach angesprochene ROM-Monitor ist im wesentli¬ 
chen ein solches Betriebssystem. Seine Routinen werden sehr oft von 
Anwenderprogrammen mitbenutzt. Wir lernen die ersten kennen: 

Die Subroutine BELL (003E) löst ein kurzes Tonsignal aus. Wir 
können sie sehr schnell anwenden, indem wir in P6.1.1 Zeile 200A 
abändern zu CALL 003E. Dann piept der Computer so oft, wie der 
Inhalt von 1200 vorschreibt, und noch einmal hinterher beim Rück¬ 
sprung in den Monitor. 

6.2.1 Verschachtelung von Subroutinen 

Wir können die Subroutine BELL aber auch an anderer Stelle unterbrin¬ 
gen. Wir stellen in P6.1.1 die ursprüngliche Fassung des Befehls 200A 
(CALL 2015) wieder her und schreiben die Subroutine so: 


P6.2. i 

2015 ADD A., C 81 

2016 CALL 003E CD 3E 00 

2019 RET C9 


Jetzt wird die Subroutine BELL aus einer anderen Subroutine heraus 
aufgerufen. Man darf Subroutinen ineinander verschachtelt je nach 
Speicherausnutzung bis zu einer Tiefe von rund hundert Ebenen — und 
mehr (vgl. Abschnitt 10.4). 
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6.3 Erweiterung des Betriebssystems (EBS) 

Manche der folgenden Programme werden sich für die Praxis des 
Programmierens in Maschinensprache als so nützlich erweisen, daß wir 
sie für spätere Benutzung unter der Kurzbezeichnung “EBS» bereitstel- 
len wolllen. Hinter dem Namen EBS sollten wir keine exakte Klassifi¬ 
zierung vermuten; wir werden auch einige Dienstprogramme (Utilities) 
unter diesem Namen aufzeichnen. 

6.3.1 Die EBS-Routine NULL 12 

Wenn wir Maschinenprogramme testen wollen, ist es oft wünschens¬ 
wert, einen bestimmten Speicherbereich, z. B. den, in dem wir unsere 
Daten unterbringen wollen, auf einen übersichtlichen Anfangszustand 
zu bringen, z. B. den Bereich 1200... 129F auf den Wert 00. Das hat 
bereits P5.1.1 getan. Wir übernehmen nun dieses Programm als Routine 
ins EBS. Zweierlei ist zu überlegen: 

1. Wo soll das EBS untergebracht werden? Da wir unseren Arbeitsbe¬ 
reich und unsere Maschinenprogramme gewohnheitsmäßig weit nach 
vorn verlegen, liegt es nahe, den Speicher von hinten her mit dem EBS 
zu belegen. Wir beginnen jedoch nicht mit CFFF als Endadresse (vgl. 
Sharp-Handbuch Seite 126), sondern mit AFFF, um Platz zu lassen für 
einen Disassembler. 

2. Ein EBS hat nur dann Sinn, wenn es immer verfügbar ist, wenn es 
benötigt wird. Wir werden es auf Band aufzeichnen und immer dann 
laden, wenn wir eigene Maschinenprogramme schreiben wollen. 

Als erstes schreiben wir P5.1.1 so um, daß es mit RET auf Platz AFFF 
endet: 

F' 6 . 3. 1 


AFF4 

LD 

B, AO 

06 

AO 

AFF 6 

L..D 

A , 00 

3E 

00 

AFF 8 

LD 

HL,1200 

21 

00 12 

AFFB 

LD 

(HL),A 

77 


AFFC 

INC 

HL 

23 


AFFD 

AFFF 

DJNZ 

RET 

AFFB 

10 

C9 

FC 
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Unterprogramme (Subroutinen) 


Wir können NULL 12 auch manuell - ohne Programmkontrolle - 
benutzen indem wir JAFF4 eintippen. Der Computer kehrt dann aller¬ 
dings auf u. U. abenteuerlichen Wegen in den Monitor zurück. 

Subroutinen können recht flexibel sein. NULL 12 erlaubt es z. B., den 
gewünschten neuen Inhalt der Speicherstellen in A, die Anzahl der zu 
überschreibenden Speicherstellen in B und die Adresse der zuerst zu 
überschreibenden Speicherstelle in HL wahlweise vorzugeben. Der 
Einsprung erfolgt dann bei AFFB. 

A6.3.2 Der Speicherbereich von 1230 bis 126F soll auf FF gesetzt 
werden. 

Wir zeichnen jetzt NULL 12 auf Band auf. Dazu nehmen Sie am 
besten ein neues Band oder ein Band, das überschrieben werden darf und 
stets für diesen Zweck zur Verfügung stehen soll. Spulen Sie es zurück, 
so daß es von der gewünschten Kassettenoberseite aus gesehen links 
sitzt. Drehen Sie dann das Band mit einem dicken Bleistift oder Kugel¬ 
schreiber so weit vor, daß der Vorspann (wenn vorhanden) gerade rechts 
zu verschwinden beginnt. Legen Sie das Band ins Kassettenlaufwerk. 
Wir stellen fest: 

1. Das, was «gesaved« werden soll, beginnt z. Z. in AFF4 

2. und endet mit AFFF. 

3. Nach dem Wiederladen von Band soll der Computer in den Monitor 
springen, also nach 0000. 

Dementsprechend geben wir jetzt den ROM-Monitor-Befehl 
SAFF4AFFF0000 und drücken <CR). Der Computer fragt FILENAME? 
Antworten Sie mit EBS. Alles andere können Sie im Handbuch nach- 
lesen. Spulen Sie nach dem Saven nicht zurück, sondern saven Sie gleich 
anschließend noch einmal (Sicherheitsmaßnahme). Schalten Sie den 
Computer aus und wieder ein und laden Sie NULL 12 vom Band. Mit 
JAFF4 können Sie sich überzeugen, daß alles korrekt abläuft. 
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Ausgabe von Zeichen und Strings 


Ein Byte kann Werte von 00 bis FF beinhalten; man kann sie - je nach 
Zusammenhang - als Zahlen oder als codierte Zeichen deuten. Die 
Zuordnung erfolgt in aller Regel nach dem American Standard Code for 
Information Interchange (ASCII). Machen Sie sich unbedingt mit dem 
ASCII vertraut (Seite 158 des Sharp-Handbuchs). 

Eine Folge von Zeichen heißt Zeichenkette oder String. 


7.1 Die Monitorroutine PRNT 


PRNT (ab 0012) schreibt das Zeichen auf den Bildschirm, das codiert im 
Akku steht. Lesen Sie auf Seite 152 des Sharp-Handbuchs nach! 

Wir wenden sie sogleich in einem Trivialprogramm an: 


P7. 1. 

1 







2000 

LD 

A, 43 

3E 

43 



’C’ 

2002 

CALL 

0012 

CD 

12 

00 



2005 

LD 

A„ B7 

3E 

B7 



’a’ 

2007 

CALL 

0012 

CD 

12 

00 



200A 

LD 

A, B3 

3E 

B3 



’m’ 

20OC 

CALL 

0012 

CD 

12 

00 



200F 

LD 

A,9E 

3E 

9E 



, p . 

2011 

CALL 

0012 

CD 

12 

00 



2014 

LD 

A, A5 

3E 

A5 




2016 

CALL 

0012 

CD 

12 

00 



2019 

L..D 

A, 96 

3E 

96 


5 

’t’ 

201B 

CALL 

0012 

CD 

12 

00 



201 e 

LD 

A, 92 

3E 

92 




2020 

CALL 

0012 

CD 

12 

00 



2023 

L.D 

A, 9D 

3E 

9D 



" r 11 

2025 

CALL 

0012 

CD 

12 

00 



2028 

HALT 


76 
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Ausgabe von Zeichen und Strings 


Wenn Sie mit dieser Fleißlösung nicht einverstanden sind, haben Sie 
schon einen recht guten Programmiergeschmack entwickelt. Wir fügen 
denn auch sogleich die schon bekannten Befehle zu einer eleganteren 
Lösung zusammen: 

1. Der auszugebende String wird ab 1200 bereitgestellt. 

2. Von dort holen wir die einzelnen Zeichen mittels LD A,(HL) in den 
Akku. 

3. Vorher ist das B-Register mit der Anzahl der auszugebenden Zeichen 
zu laden. 

4. Nach Ausgabe durch PRNT und INC HL Wiederholung bis zum Ende 
des Strings. 


P7. 1. 
1200 

2 


43 

B7 

B3 

3000 

LD 

HL,1200 

21 

00 

12 

3003 

LD 

B, 08 

06 

08 


3005 

LD 

A,(HL) 

7E 



3006 

CALL 

0012 

CD 

12 

00 

3009 

INC 

HL 

23 



300A 

DJ NZ 

3005 

10 

F9 


300C 

HALT 


76 




9E A5 96 92 9D 


A7.1.2 Wandeln Sie das Programm so ab, daß der String mit der Anzahl 
der nachfolgenden gültigen Zeichen beginnt. Sein erstes Byte muß 
natürlich nach B geholt werden. 

Ihre Lösung bietet den Vorteil, daß man ab 1200 beliebige Strings 
bereitstellen und mit einheitlichem Programm ausgeben kann. Sie 
sollten das mehrfach ausprobieren! 

Wozu aber zählen wir die Länge der Zeichenkette ab? Kann man das 
nicht umgehen? 


7.2 Die Ausgabe von Strings mit Schlußzeichen 

Wir formen den String so um: 

1200 43 B7 B3 9E A5 96 92 9D 2A 

Darin ist 2A der ASCII für « ★ >> (asterisk). Nun ist eine im wesentlichen 
zweiteilige Aufgabe zu lösen: 
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1. Beim zeichenweisen Lesen des Strings muß der Asteriskus erkannt 
werden. 

2. Beim Erkennen muß der Programmablauf geändert werden. 

A7.2.1 Sie kennen bereits die benötigten Befehle. Codieren Sie diesen 
Ansatz! 

A7.2.2 Schreiben Sie das Programm so um, daß es als Subroutine 
benutzt werden könnte: 

1. Es soll in 3000 beginnen. 

2. Statt HL soll DE benutzt werden. 

3. Das DE-Register soll in einem Hauptprogramm gesetzt werden. 

4. Der String soll mit 0D (carriage return) enden. Sie können Ihre 
Subroutine mit folgenden Strings und folgendem Hauptprogramm te¬ 
sten: 

P7.2.3 


1200 



41 

BB 

BB 

92 

A4 

0D 


1.206 



A9 

BB 

Al 

9E 

9E 



120D 



AA 

Al 

B3 

B7 

A4 

2 l^OD 


2000 

LD 

DE , 1200 

11 

00 

12 


5 Anf 

.-Adr. 

1. St.r. 

2003 

CALL 

3000 

CD 

00 

30 





2006 

LD 

DE, 1206?- 

11 

06 

1 .c.. 


$ An f 

-- Adr - 

2« Str. 

2009 

CALL 

3000 

CD 

00 

30 





2000 

LD 

DE,120Dr 

1 1 

0D 

12 


; Anf 

. --Adr. 

3.Str• 

200F 

CALL- 

3000 

CD 

00 

30 





2012 

HALT 


76 








Sicherlich sind Sie mit dem Ergebnis nicht voll zufrieden. Die fehlen¬ 
den Zwischenräume (spaces oder auch blanks| können Sie auf zweierlei 
Weise einfügen: 

1. Sie können mit CALL 000C die Monitorroutine PRINTS (PRINT 
Space) aufrufen oder 

2. in die Strings an passenden Stellen spaces (Code 20) einfügen. 

Man hätte natürlich auch unter Einführung der erforderlichen spaces 

alle drei Wörter zu einem einzigen String zusammenfügen können. 
Unser Ziel ist es jedoch, die drei Wörter untereinander zu schreiben. 
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7.3 Die Routinen LETNL, MSG und MSGNL 

Die Monitorroutine LETNL (LET New Line, aufgerufen mit CALL 
0006) bewirkt die Ausgabe einer neuen Zeile. Fügen Sie sie ins Haupt¬ 
programm ein! 

Ihre Routine L7.2.2 bewirkt im wesentlichen dasselbe wie die mit 
CALL 0015 aufzurufende Monitorroutine MSG (message: Botschaft). 
Ersetzen Sie in P7.2.3 jeweils CALL 3000 durch CALL 0015! 

Es kommt häufig vor, daß man nach der Ausgabe eines Strings eine 
neue Zeile beginnen will. Wir können dabei jeweils eine Programmzeile 
sparen, indem wir im EBS eine Routine MSGNL bereitstellen: 


P7.3.1 

MSGNL AFED CALL 0015 CD 15 OO ; MSG 

AFFO CALL 0006 CD 06 00 5 LETNL 

AFF3 RET C9 

Wie Sie im Sharp-Handbuch auf Seite 152 nachlesen können, sind 
während des Ablaufs von MSG alle Register geschützt, und während 
des Ablaufs von LETNL alle bis auf AF. Das erlaubt ein wiederholtes 
Aufrufen von MSG und MSGNL: 


P7.3. 

1200 

2 


4D 

5A 

2D 37 

30 30 1 

2000 

LD 

DE,1200 

1 1 

00 

12 


2003 

CALL 

AFED 

CD 

ED 

AF 

5 MSGNL 

2006 

CALL 

AFED 

CD 

ED 

AF 

5 MSGNL 

2009 

CALL 

AFED 

CD 

ED 

AF 

$ MSGNL 

200C 

CALL- 

AFED 

CD 

ED 

AF 

5 MSGNL 

200F 

HALT 


76 





A7.3.3 Vielleicht versuchen Sie ein kürzeres Programm, das 22mal 
VOGEL-BUCHVERLAG untereinanderschreibt. 
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Zwei komfortablere Programmabschlüsse 


Es war schon ein Fortschritt, als wir unsere Programme mit JP 0000 
beendeten. Die letzten Beispiele nötigten uns jedoch, wieder auf das 
grobe HALT zurückzugreifen. Aber können wir nach einer Rechnung 
nicht auch den Speicherauszug per Programm anfordern? 


8.1 Die EBS-Routine DUMP 12 


PB. 1. 1 

DUMP12 AFDF 
AFE2 
AFE5 
AFE9 


LD DE,AFE5 
JP 0D29 
A n f a ncjsad r e b b e 
Eün d ad resse + 1 


11 E5 AF ; Str i ngarvf . 

C3 29 CD 5 in Monitor 

31 32 30 30 

31 32 41 30 


Wir überzeugen uns davon, daß NULL12, MSGNL und DUMP12 gela¬ 
den sind und saven alle drei Routinen mit SAFDFAFFF0000, wieder 
unter dem Namen EBS. Sofort erheben sich zwei Fragen: 

1. Was haben wir damit gewonnen? 

2. Wie funktioniert das? 

Zu 1: Tippen Sie doch bitte P5.3.1 noch einmal ein und lassen Sie es in 
2010 mit JP AFDF enden. Probelauf? Wenn alles richtig eingegeben 
wurde, müßten Sie jetzt nach abgeschlossener Multiplikation von 
(1200) und (1201) - hatten Sie dort auch zwei gültige Faktoren eingege¬ 
ben? - den Hexdump ab 1200 mit dem fertigen Produkt in 1202 sehen. 
Im anderen Fall müßten Sie genau überprüfen, ob Sie auch alles richtig 
eingegeben haben. 

Zu 2: Wir setzten DE auf die Anfangsadresse eines 8 Bytes langen 
Strings, der die Anfangs- und die um eins erhöhte Endadresse des 
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Zwei komfortablere Programmabschlüsse 


gewünschten Speicherauszugs enthält. Die Monitorroutine DUMP, in 
die wir sonst mit dem D-Befehl hineinspringen, beginnt mit einer 
Decodierung dieser beiden Adressen und sorgt dann für die Ausgabe des 
Speicherauszugs. Sic finden das Listing dieser Routine auf Seite 195 des 
Sharp-Handbuchs (Querformat, links unten). 

Eine genauere Untersuchung wäre im Augenblick noch verfrüht. 
Experimentieren Sie jedoch mit anderen Anfangs- und Endadressen! 
Probieren Sie auch die folgende Variante aus: 

P8.1.2 


AO0O 

L_D 

HL, Anfang 

21 

00 

00 

A0O3 

L..D 

DE,Ende*1 

1 1 

34 

01 

AO06 

JP 

0D37 

C3 

37 

0D 


Vielleicht versuchen Sie zu einem späteren Zeitpunkt, den Vorgang 
genauer zu erfassen. 


8.2 Die EBS-Routine PAUSKY 

Mehrere der letzten Programme mußten wir mit HALT beenden, und es 
störte wieder, daß danach der Computer hängt. Wandeln Sie L7.3.3 
unten wie folgt ab: 

PB.2. 1 

400D CALL 001B CD 1B OO ;GETKY 

4010 JR Z,40OD 28 FB 

4012 .JP 0000 C3 OO 00 

Das Programm läuft nun wie bisher ab und bleibt wie bei HALT stehen. 
Wenn Sie aber dann eine beliebige Taste drücken, springt der Computer 
an den Anfang des Monitorprogramms. 

Wie funktioniert das? Die Monitorroutine GETKY (001B) fragt die 
Tastatur ab. Ist keine Taste gedrückt, enthält der Akku den Wert 00, 
und im F-Register wird das Z-Flag gesetzt: Bedingter relativer Rück¬ 
sprung nach 400D (vgl. Abschnitt 5.4). Wird hingegen eine Taste 
gedrückt, enthält der Akku ihren ASCII-Wert und das Z-Flag wird 
gelöscht: kein Rücksprung und weiter zum Monitor. 
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Uns gefällt der Dreizeiler so gut, daß wir ihn ins EBS aufnehmen: 


F'8 «2.2 

AFD4 

5mal NÜP 

00 

00 00 00 00 

PAUSKY 

AFD9 

CALL ÖÖ1B 

CD 

1 B 00 


AFDC 

JR Z,AFD9 

28 

FB 


AFDE 

RET 

C9 



Die fünf NOPs sollen Platz reservieren für eine spätere Ergänzung. - 
Wir saven mit SAFD4AFFF0000 und ändern L7.3.3 so ab: 

F'8 „ 2 • 3 

40ÖD CALL AFD9 CD D9 AF ; F’AUSKY 

4Ö1Ö JP 0000 C3 00 00 

PAUSKY wird mit CALL aufgerufen, da es mit RET endet. Leider wird 
PAUSKY häufig von kurzen bzw. schnellen Programmen ignoriert. 
Ausweg: Entweder gehe man vom vollgeschriebenen Bildschirm aus, 
denn das Scrolling erfordert - hier so gewünscht - eine kleine Zeit¬ 
spanne, oder man greife behelfsmäßig auf HALT zurück. Wir werden 
diesen Mangel bald (in Abschnitt 10.5) beheben. 
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1=11=11=11=11=11=11=11=11=1 b=i i=i i=i i==i 4 =ii=i i=n i=i t=i 

Gehei 

me Verschl uß©ac:hi 

s 

5000 

21 

08 50 

LD 

HL,5008 

5003 

06 

1B 

LD 

B, 1B 

5005 

34 


INC 

<HL) 

5006 

23 


INC 

HL 

5007 

10 

FB 

DJNZ 

5004 

5009 

10 

10 

DJNZ 

501B 

500B 

4F 


LD 

C,A 

500C 

CC 

14 FF 

CALL 

In FF 14 

500F 

17 


RLA 


50 1 0 

0B 


DEC 

BC 

5011 

15 


DEC 

D 

5012 

55 


LD 

D, L 

5013 

A5 


AND 

L. 

SO 14 

91 


SUB 

C 

5015 

B7 


ÜR 

A 

5016 

1F 


RRA 


5017 

52 


LD 

Dj, D 

5018 

9D 


SBC 

A,L 

5019 

A0 


AND 

B 

501A 

AD 


XGR 

L 

501B 

20 

0C 

JR 

NZ H 5029 

50 ID 

20 

07 

JR 

NZ, 5026 

501F 

4F 


LD 

Cn A 

5020 

05 


DEC 

B 

5021 

1A 


L.D 

A,(DE) 

5022 

34 


INC 

(HL) 

5023 

23 


INC 

HL 

5024 

10 

FC 

DJNZ 

5022 

5026 

76 


HALT 


Sie können den 

Mitl 

■/. e 11 eil 

aber 

a u c. h ersetzen d u r c h 

5012 

46 


L.D 

B,(HL) 

5013 

91 


SUB 

A n C 

501 4 

9 7 


SUB 

Ah A 

5015 

91 


SUB 

H H C 

5016 

A5 


AND 

L. 

5017 

B2 


GR 

D 

5018 

AF 


XGR 

A 

5019 

A5 


AND 

L 

501. A 

A3 


AND 

E 
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Indizierte Adressierung 


Die Z80-CPU besitzt zwei Indexregister: IX und IY. Ihre Besonderheiten 
werden am besten am Beispiel deutlich. Betrachten wir den Befehl 
LD A,(IX+d) und nehmen wir an, daß IX = 1203 und d = 05 sei; dann 
würde der Akku indirekt indiziert aus Adresse 1208 geladen werden. 
Für d gilt dasselbe wie für die Sprungweiten: 100 > d > 7F wird als 
negative Zahl gedeutet. 


9.1 Sechzehnstellige Addition 


Wir speichern die beiden Summanden nach 1200... 1207 und 
1208 ... 120F ein und schicken das Ergebnis in die Zeile darunter, nach 
1210... 1217: 


P 9. 1 . 

1 






2000 

LD 

IX,1207 

DD 

21 

07 

12 

2004 

LD 

B ? 08 

06 

08 



2006 

3 CF 


F. 7 




2007 

CÜF 


3F 




2008 

LD 

A,(IX+00) 

DD 

7E 

00 


200B 

ADC 

Am (IX+08) 

DD 

8E 

08 


200E 

NÜP 


00 



;später 

200F 

LD 

<IX+10X,A 

DD 

77 

10 


2012 

DEC 

IX 

DD 

2B 



2014 

DJ NZ 

2008 

10 

F2 



2016 

JP 

AFDF 

C3 

DF 

AF 

;DUMP12 


Versuchen Sie, den Programmablauf Schritt für Schritt nachzuvollzie¬ 
hen: Es wird zuerst das im Dump rechts oben stehende Byte in den 
Akku geholt, dann das darunterstehende hinzuaddiert und die Teil¬ 
summe noch eine Zeile tiefer darunter abgelegt. Anschließend wird IX 
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um 1 vermindert (dekrementiert) und der Vorgang je eine Doppelstelle 
weiter links siebenmal wiederholt. Beachten Sie auch, daß die Rech¬ 
nung um der Einheitlichkeit willen sogleich mit ADC beginnt und 
deshalb - hier noch ein wenig umständlich - Carry zu Beginn gelöscht 
wurde. Suchen Sie im Handbuch den Befehl SBC A,(IX+d), und subtra¬ 
hieren Sie ebenso! Vergessen Sie auch nicht, dezimal zu rechnen! 

9.2 Eingriffe in den Bildspeicher (Video-RAM) 

Wie wir aus dem Handbuch (vgl. Seiten 128 f.) wissen, entsprechen dem 
Bildschirm die Adressen D000 bis D3E7. Lädt man nun eine dieser 
Speicherstellen mit einer Zahl, erscheint das dieser Zahl entsprechende 
Symbol auf dem Bildschirm. Geben wir z. B. ein MD3E7 (CR), CA 
(CR), so erscheint auf dem Bildschirm ein Strichmännchen. Um 
zusätzliche Grafiksymbole unterbringen zu können, verwendet Sharp 
für die Belegung des Bildschirmspeichers nicht den ASCII, sondern 
einen eigenen Bildschirmcode (siehe Sharp-Handbuch S. 159). Wir fin¬ 
den dort insgesamt vier Männlein, und wenn wir sie so anordnen: CA, 
CC, CD, DB, ...., dann schlagen sie Rad. Das bringt uns auf eine Idee, 
die wir schrittweise verwirklichen wollen. Wir speichern die Anzeige¬ 
codes in der angegebenen zyklischen Reihenfolge in die letzten 40 Bytes 
vor dem Video-RAM und transferieren sie mit LD A, (IX-78) und LD 
(IX+78) ,A in den Bildspeicher und erhalten - wenigstens im Prinzip - 
einen bewegten Radschläger auf dem Bildschirm: 


P 9.2 „ 

cpce 

1 

L.D 

IX,DO50 

DD 

21 

5© 

CFC4 

LD 

B, 28 

06 

28 


CFG 6 

LD 

A,(IX-78) 

DD 

7E 

89 

CFC9 

LD 

< IX+78) , A.- 

DD 

77 

78 

CFCC 

INC 

IX 

DD 

23 


CF CE 

DJNZ 

CFC6 

10 

F 6 


CF DO 

HALT 


76 




Das Programm läuft, doch sollte einiges verbessert werden: 1. Es läuft 
etwa tausendmal zu schnell ab. 2. Das Momentbild bleibt stehen, so 
daß ein Bildstreifen entsteht. Das jeweils letzte Bild müßte gelöscht 
werden. 
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Vom Prozessorstapel (Stack) 


Ein bestimmter Speicherbereich - beim MZ-700 von 10EF bis 1000 
(rückwärts numeriert!) - dient dem Prozessor als unmittelbarer Zwi¬ 
schenspeicher. Wir haben ihn schon benutzt, ohne ihn zu kennen. 


10.1 Der Stapel als Rücksprunggedächtnis 

Wenn man mit CALL eine Subroutine aufruft, dann legt der Prozessor 
die Adresse, zu der er nach Abarbeiten der Subroutine zurückkehren 
muß, auf dem Stapel ab. Eine Adresse ist 16 bit breit und füllt also zwei 
Bytes. Dementsprechend werden bei CALL jedesmal zwei Bytes auf 
dem Stack abgelegt und bei RET wieder heruntergeholt. Es gibt im 
Prozessor noch weitere, bisher unerwähnte Register, z. B. den Stack¬ 
pointer (SP), der die jeweils aktuelle Adresse zum Stack enthält. Beim 
Ablegen auf dem Stapel wird SP um insgesamt 2 vermindert, beim 
Zurückholen vom Stapel um 2 erhöht. Nochmals: Der Stackpointer 
(SP, Zeiger auf die aktuelle Stackadresse) ist ein Register im Prozessor. 
Der Stapel selbst wird irgendwo im RAM organisiert. Weshalb nicht im 
ROM? Nun, dann könnte man ja nichts hineinschreiben. 


10.2 Der Stapel als kurzzeitiger Datenspeicher 

Man kann den Stapel aber auch willkürlich als kurzzeitigen Datenspei¬ 
cher benutzen. Mit PUSH wird der Inhalt eines 16-bit-Registers (BC, 
DE, HL, AF, IX oder IY) auf dem Stapel abgelegt und mit POP wieder 
zurückgeholt. Man muß dabei sehr genau darauf achten, daß man 
insgesamt PUSH und POP gleich viele Male, in der richtigen Reihen¬ 
folge und nicht von anderen Stackoperationen gestört zur Ausführung 
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bringt. Sonst würde der Prozessor beim Zugriff auf den Stapel unsinnige 
Werte oder unsinnige Adressen vorfinden und der Computer «ab- 
stürzen». 

Al0.2.1 Speichern Sie nach 1200 12 und nach 1201 34 ein und schreiben 
Sie ein Programm, das diese zwei Bytes über DE zum Stapel transpor¬ 
tiert und von dort über BC nach 1202 und 1203! 

A10.2.2 Speichern Sie ab 1200 12 34 56 78 ein und schreiben Sie ein 
Programm, das die Inhalte von 1200 und 1201 gegen die Inhalte von 
1202 und 1203 tauscht, indem der Inhalt von BC (kürzer: (BC)) einmal 
auf dem Stapel zwischengespeichert wird. 


10.3 Stapelmanipulationen 


Wir schreiben zunächst ein Trivialprogramm aus verschachtelten Sub¬ 
routinen mit folgender Struktur: 

0. Ebene 0. Ebene 

1. Ebene 1. Ebene 

2. Ebene 

Es soll nicht mehr tun, als sich aus jeder Ebene mit dem jeweiligen 
Niveau zu melden. (Haben Sie auch das EBS geladen?) 


RIO.3. 

1 







1 200 

*0.EBENE’ 

30 

2E 

45 

42 

45 4E 45 0D 

1208 

•- 1. EBENE ’ 

31 

2E 

45 

42 

45 4E 45 0D 

1210 

’2.EBENE’ 

32 

2E 

45 

42 

45 4E 45 0D 

2000 

LD 

DE,1200 

1 1 

00 

12 



2003 

CALL- 

MSGNL 

CD 

ED 

AF 



, 2006 

CAL. L 

2015 

CD 

15 

20 


5 zur 1 - Ebene 

2009 

LD 

DE,1200 

1 1 

00 

12 



200C 

CALL 

MSGNL 

CD 

ED 

AF 



200F 

CALL 

PAUBKY 

CD 

D9 

AF 


;oder HALT 

2012 

JP 

MONITR 

C3 

00 

00 



'#2015 

L.D 

DE,1208 

11 

08 

12 



2018 

CALL 

MSGNL 

CD 

ED 

AF 



.201B 

CALL 

2025 

CD 

25 

20 


5 zur 2-Ebene 

A201E 

L.D 

DE,1208 

1 1 

08 

12 



/ u2021 

CALL 

MSGNL 

CD 

ED 

AF 



V 2024 

RET 


C9 
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2025 LD DE,1210 11 10 12 

2028 CALL MSGNL CD ED AF 

202B RET C9 

(Hoffentlich empfinden auch Sie das allmähliche Einstreuen von Ele¬ 
menten der Assemblersprache als Lesehilfe!) 

Das Programm zeigt ein verblüffendes Ablaufverhalten. Ruft man es 
z. B. nach Dl200 auf, läuft es ganz nach Planung ab. Startet man es aber 
vom fast leeren Bildschirm aus, taucht für einen kurzen Moment die 
vorgesehene Schrift auf, um sogleich zu verschwinden. Beim systemati¬ 
schen Probieren findet man heraus, daß das Programm so schnell 
abläuft, daß man den Finger gar nicht schnell genug von der Tastatur 
lösen kann, so daß PAUSKY eine (noch) gedrückte Taste vorfindet. Ist 
der Bildschirm hingegen mit Zeichen angefüllt, wie z. B. nach Dl200, 
so muß bei jeder neuen Schriftzeile gescrollt werden. Das verbraucht 
genügend Zeit, damit man den Finger bis zum Erreichen von PAUSKY 
wieder heben kann. Wir hielten vor PAUSKY 5 Bytes frei, um später 
eine Verzögerung davorzusetzen. 

Wir beginnen nun mit der eigentlichen Stack-Manipulation. In 202B 
verwerfen wir eine Rückkehradresse, indem wir ein nicht weiter ausge¬ 
wertetes POP DE einschieben: 


P10 h3.2 
202B POP DE 
202C RET 

Jetzt springt das Programm nach RET aus der 2. Ebene sofort in die 0. 
Ebene zurück. Das ist richtig, denn wir haben ja mit POP eine Rück¬ 
sprungadresse verworfen. 

Der Stapel hat eine LIFO-Struktur (last in first out). Das bedeutet, daß 
das zuerst Abgelegte als letztes wieder herauskommt. Vergleichen Sie 
das mit einem Tellerstapcl: Der zuletzt aufgelegte Teller wird als erster 
abgenommen, der zuerst hingelegte (unterste) als letzter. Der Stapel 
wird von den höheren zu den niedrigeren Adressen hin belegt und in 
umgekehrter Richtung ausgelesen, wobei jeder Eintrag 2 Bytes umfaßt. 
Mit POP nahmen wir zwei Teller vom Stapel, jedoch ohne sie zu 
benutzen. 

Wir führen nun bei gleicher Wirkung das Programm auf einem 
anderen Wege aus der 2. gleich in die 0. Ebene zurück, indem wir die 


Dl 

Ü9 
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Stapelzugriffadresse, also den Inhalt des Stackpointers, um 2 erhöhen, 
d. h. zweimal inkrementieren. 

P1 0 . 3.3 
202B INC SP 
202C INC SP 
202D RET 

Diese Variante führt zum gleichen Ablauf wie P10.3.2 

A10.3.4 Was wird geschehen, wenn man statt dessen SP zweimal 
dekrementiert? Suchen Sie den Opcode, ändern Sie das Programm ah 
und deuten Sie Ihre Beobachtung! 

AI0.3.5 Benutzen Sie die neuen Befehle, um die Inhalte von H und L zu 
vertauschen. Fünf Stackoperationen genügen. 

Eine weitere Manipulation: Unser Programm benutzt das HL-Register 
nicht. Wir erzwingen nun über dieses einen Sprung aus der 2. Ebene 
nach 2025, also in die 2. Ebene, indem wir diese Rücksprungadresse 
nach HL laden und mittels Stackpointer indirekt in den Stapel ablegen: 


33 

33 

C9 


P10.3. 

6 



202B 

LD 

HL,2025 

21 

202E 

EX 

(SP),HL 

E3 

202F 

RET 


C9 


Der Befehl EX (SP),HL vertauscht (exchange) die Inhalte von HL und 
der in SP eingeschriebenen Adresse, und die gehört zum Stapel. - Wir 
sind mit dem Erfolg zufrieden, auch wenn sich nach einer Reihe 
planmäßiger Wiederholungen schließlich auch unplanmäßige Ein¬ 
schübe einstellen, weil wir den Stapel unterlaufen. Sie könnten versu¬ 
chen, das Schritt für Schritt und Schleife für Schleife nachzuvoll¬ 
ziehen. 

A10.3.7 Bevor wir diesen Abschnitt verlassen, sollten Sie P10.3.1 noch 
ein wenig straffen. 
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10.4 Wir richten einen eigenen Stapel ein 

Der Z80-Stapel liegt nicht zwangsläufig im Bereich 10EF... 1000, son¬ 
dern wurde vom Monitor softwaremäßig dort eingerichtet. Lesen Sie 
auf Seite 170 des Sharp-Handbuchs nach: Das Monitorprogramm 
beginnt mit einem Sprung nach 004A, und dort steht LD SP,10F0. Hier 
wird der Stackpointer so gesetzt, daß der erste Eintrag in 10EF erfolgt. 
Wir benutzen denselben Befehl und richten uns einen eigenen Stapel 
(«Anwenderstapel») ab 1FFF ein: 


RIO.4. 
2000 

1 

LD 

SP,2O0O 

31 

00 

20 

2003 

CALL 

2006 

CD 

06 

20 

2006 

CALL- 

2009 

CD 

09 

20 

2009 

CALL 

2O0C 

CD 

OC 

20 

20 OC 

CALL 

2 OOP" 

CD 

OF 

20 

20OF 

JP 

NONI TR 

C3 

00 

00 


Dieses an sich sinnlose Programm richtet einen eigenen Stapel ein, 
schreibt einige Rücksprungadressen hinein, die Sie bitte mit D1FE0 
kontrollieren wollen, und springt dann in den Monitor, der sofort 
wieder den «Systemstapel» einrichtet. 

A10.4.2 Schreiben Sie ein Programm, das ab 1FFF (in Stapelrichtung zu 
lesen!) 12 34 12 35 12 36... 13 33 einschreibt! 

Wir lassen noch ein Stapelexperimcnt folgen, bei dem der momentane 
Stand des Stapelzeigers nach 1200 (+1) gerettet und dann von dorther 
wiederhergestellt wird: 


P10.4 

2040 

CALL- 

2048 

CD 

48 

20 

2043 

CALL 

BELL 

CD 

3 PI 

00 

2046 

JR 

2043 

18 

FB 


2048 

LD 

(1200),SP 

ED 

73 

00 

204C 

LD 

SP„2000 

31 

00 

20 

204F 

CALL 

2052 

CD 

52 

20 

2052 

CALL 

2055 

CD 

55 

20 

2055 

CALL 

2058 

CD 

58 

20 

2058 

LD 

SP,(1200) 

ED 

7B 

00 

205C 

RET 


C9 
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Das Dauerpiepsen nach Durchlauf zeigt uns, daß der Computer nicht 
irgendwo ausgestiegen ist, sondern genau die beabsichtigte Stelle er¬ 
reichte. 


10.5 Eine Verzögerungsroutine fürs EBS 


Ihre Wirkung beruht darin, daß wir den Prozessor in drei Ebenen 
verschachtelt auf der Stelle zählen lassen. Schematisch sieht das so aus: 

32102101002101001000 
33332221 102221 101 100 
33333333332222221110 

Dies sind 20 Zählschritte, lächerlich für einen Mikroprozessor. Wenn 
Sie Zeit haben, probieren Sie es doch einmal mit 4 4 4 aus! Sie werden 
dann schon glauben, daß auch eine CPU spürbar Zeit benötigt, um etwa 
mit A0 A0 A0 fertig zu werden. Wir schreiben die entsprechende 
Routine sogleich passend fürs EBS: 


P10.5. 1 


WARTEN 

AFB8 

PUSH 

AF 

FS 

— 

— 

— 

- 

— 


AFB9 

PUSH 

AF 

F5 

— 


— 

— 

- 


AFBA 

PUSH 

AF 

FS 

— 

— 

— 

- 

~4- ! 

LABEL 

AFBB 

POP 

AF 

Fl 

— 




1 1 


AFBC 

DEC 

A 

3D 


i 



1 1 


AFBD 

PUSH 

AF 

FS 

— 

•4 



1 1 


AFBE 

JR 

NZ,LABEL 

20 

FB 




1 1 


AFC0 

PGP 

AF 

Fl 

— 

-- 

4- 


1 1 


AFC1 

POP 

AF 

Fl 

— 

+ 

1 


1 1 


AFC2 

DEC 

A 

3D 


i 

1 


1 1 


AFC3 

PUSH 

AF 

FS 

— 

+ 

I 


1 1 


AFC4 

PUSH 

AF 

FS 

— 

— 

•4 


1 1 


AFC5 

JR 

NZ,LABEL 

20 

F4 




1 1 


AFC7 

POP 

AF 

Fl 

— 

— 

— 

4- 

1 1 


AFC8 

POP 

AF 

Fl 

— 

— 

•4 

l 

1 1 


AFC9 

POP 

AF 

Fl 

— 

4 

1 

• 

1 1 


AFCA 

DEC 

A 

3D 


1 

i 

i 

1 1 


AFCB 

PUSH 

AF 

FS 

— 

•4 

l 

i 

1 I 


AFCC 

PUSH 

AF 

FS 

— 

— 

•4- 

i 

1 1 


AFCD 

PUSH 

AF 

FS 

— 

— 

— 

4- 

1 1 


AFCE 

JR 

NZ,LABEL 

20 

EB 




1 1 


AFDO 

POP 

AF 

Fl 

— 

— 

— 

■ — 

-•4 ! 


AFD1 

POP 

AF 

Fl 

— 

— 

— 

— ■ 

-4- 


AFD2 

POP 

AF 

Fl 

— 

— 

— 


— 


AFD3 

RET 


C9 
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Die bedingten (Rück-)Sprünge werden korrekt ausgeführt, weil bei 
Ausführung der Befehle DEC 8-bit-Register (dekrementiere, siehe Z80- 
Handbuch) das Zero-Flag dem im angesprochenen Register stehenden 
Wert entsprechend gesetzt oder gelöscht wird. Ein CP 00 erübrigt sich 
deshalb. 

Die eckigen Klammern am rechten Rand sollen zeigen, daß jedem 
PUSH genau ein POP entspricht. Das allein genügt nicht: Auch im 
Programmablauf müssen die Anzahlen der PUSHs und der POPs über¬ 
einstimmen! Das Benutzen der neuen Routine setzt voraus, daß unmit¬ 
telbar vor ihrem Aufruf der Akku mit einem vernünftigen Wert (delay, 
Verzögerung) geladen wird. 

Wir testen die neue Routine mit dem Kurzprogramm 

PIO-5.2 

2O00 LD Am AO 3E A0 

2002 CALL AF'BB CD B8 AF 

2005 JP MONITR C3 00 00 


Al0.5.3 Stellen Sie eine Tabelle auf, die die Verzögerung (in Sekunden) 
in Abhängigkeit von (A) angibt. 

Wir benutzen die neue Routine sogleich zur Vervollständigung von 
PAUSKY: p r 

P10.5.4 

F'AUSWK AFD4 LD A, 30 3E 30 

AFD6 CALL WARTEN CD B8 AE 


£■0 s jTc 


10.6 Verbesserung des Radschlägers 

Wir beziehen uns auf die Kritik an P9.2.1: 

1. Wir bauen eine Verzögerungsroutine ein und probieren eine angemes¬ 
sene Verzögerung aus. 

2. Sobald das neue Bild gezeichnet wird, löschen wir das alte; der 
Bildschirmcode für Space ist 00. 

3. Im Verhältnis zu unseren kurzen Programmen bietet der MZ-700 
beinahe unendlich viel Platz. Wir verlegen daher unseren versteckten 
Zeichenvorrat aus der Bildschirmnähe nach 1300... 1327. Dann wird 
allerdings die Entfernung zwischen CFD8 und 1300 viel größer, als das 
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Offset d in (IX+d) erlaubt. Das ist nicht schlimm; wir nehmen einfach 
beide Indexregister, IX und IY, zu Hilfe: 


FTO. 6 . 

1 






2000 

LD 

B, 28 

06 

28 



2002 

L.D 

IX,1300 

DD 

21 

00 

13 

2006 

LD 

IY„D3C0 

FD 

21 

CO 

D3 

2O0A 

LD 

A, <IX+00> 

DD 

7E 

00 


200 D 

LD 

(IY+00),A 

FD 

77 

00 


2010 

LD 

A, 60 

3E 

60 


5 variier en 

2012 

CALL 

WARTEN 

CD 

B 8 

AF 


2015 

LD 

(IY+00),00 

FD 

36 

00 

00 5 space 

2019 

INC 

IX 

DD 

OT 

jt-O 



201 B 

INC 

IY 

FD 

23 



201 D 

DJNZ 

200 A 

10 

EB 



201F 

CALL 

PAUSKY 

CD 

D9 

AF 


2022 

JP 

MONITR 

C3 

00 

00 



Al0.6.2 Verändern und ergänzen Sie das Programm so, daß sich das 
Männlein vorwärts und rückwärts bewegt! 

Unser Lösungsvorschlag LI0.6.2 führte den Programmablauf in eine 
«endlose Schleife». Das wäre in der kommerziellen Datenverarbeitung 
ein ganz schwerer Fehler! Da der Homecomputer jedoch uns ganz allein 
zur Verfügung steht, nahmen wir den gewaltsamen Programmabbruch 
mit RESET in Kauf. 

Eine Verbesserungsmöglichkeit bietet die Monitorroutine BRKEY 
(00IE). Drückt man die Tasten SHIFT und BREAK gleichzeitig, kehrt 
der Prozessor aus dieser Routine mit gesetztem Zero-Flag zurück. Wir 
können das zur Unterbrechung der endlosen Schleife verwenden: 


FTO. 6 . 3 

2036 CALL BRKEY 
2039 JR NZ,2000 
203B JF' MONI TR 


CD IE 0O 
20 C5 
C3 00 00 


Dieser Schluß ist so brauchbar, daß wir ihn zu einer EBS-Routine 
umschreiben: 

RIO. 6 .4 

SBMONI AFB3 CALL BRKEY CD IE 00 

AFB 6 RET NZ CO 

AFB7 RST 00 C7 
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Freundliche Erinnerung: SAFB3AFFF0000 - EBS 
Gleich zwei neue Befehle auf einmal? Fast könnte man antworten: 
nein! 

RETNZ Dieses bedingte RET mölken Sie eigentlich jetzt schon unmit¬ 
telbar, zumindest aber mit Hilfe des ZSO-Handbuchs verstehen können. 
RST 00 Vielleicht sehen Sie sich mit D000 noch einmal den Anfang des 
Monitorprogramms an. Es beginnt mit einer Reihe von Sprungbefehlen 
von der Form JP nn. Einige von ihnen können Sie mit Restart-Befehlen 
erreichen, z. B. 


0000 JP 004A mit RST 00 = C7 
0018 JP08A1 mit RST 18 = DF 
0030 JP01C7 mit RST 30 = F7 
0038 JP 1038 mit RST 38 = FF 

Die RST-Befehle entsprechen einem CALL. Näheres finden Sie im Z80- 
Handbuch. 

Wir bauen eine neue Routine in den Schluß von P10.6.3 ein: 


P10. 6.5 

2036 CALL SBMONI CD B3 AF 

2039 JR 2000 18 C5 


Anregung: Lassen Sie doch PI0.4.1 mit RST 00 enden und überzeugen 
Sie sich, daß die virtuelle Rücksprungadresse 2010 in “unseren» Stapel 
eingeschrieben wurde. 
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l v l u s t e r s t a p e 1e :i 


3OO0 

L D 

SP,D3E0 

31 

E0 

D3 

3O03 

LD 

HL,F0F0 

21 

F0 

F0 

3006 

LD 

DE , 0C09 

11 

09 

0C 

3O09 

AND 

A 

A7 



300A 

LD 

B y A7 

06 

A7 


3O0C 

PUSH 

HL 

E5 



3001) 

INC 

SP 

33 



30OE 

ADD 

HL, DE 

19 



300F 

PUSH 

HL 

ES 



30 10 

SBC 

HL, DE 

ED 

52 


3012 

PUSH 

HL 

E5 



3013 

INC 

SP 

33 



3014 

ADD 

HL, DE 

.19 



30 1 5 

PUSH 

HL 

E5 



3016 

SBC 

HL, DE 

ED 

52 


3010 

DJNZ 

300C 

10 

F2 


301A 

HALT 


76 




Erfinden Sie weitere Muster! 





11 

Rotieren und Shiften 


Man kann den Inhalt eines 8-bit-Registers oder einer Speicherstelle um 
ein Bit nach links oder rechts verschieben. In diesen Vorgang kann auch 
das Carry-Bit einbezogen werden. Wird dabei in einem Kreise (von 8 
oder 9 Bits) herumgeschoben, heißt die Bewegung «Rotieren», anderen¬ 
falls «Shiften». 

11.1 Ziel: Bitweise Multiplikation 

Auch wenn wir bald ein weniger aufwendiges Verfahren kennenlernen 
werden, multiplizieren wir zunächst einmal ganz fachgerecht bitweise. 
Das Bit-Einmaleins wäre ein wunderbares Objekt für Grundschüler, 
denn sie brauchten sich nur vier Produkte einzuprägen: 0 * 0 = 0, 0 * 1 
= 0, 1 ★ 0 = 0 und 1*1 = 1. Statt langer Erklärungen ein Beispiel: 


19d * 23d « 10011^10111 
10 U 1 
101 1 1 
00000 
00000 

10111 _ 

110110101 * 437d 


Bild 11.1 Bitweise Multiplikation 


Das schwierigste hieran ist sicherlich nicht die Multiplikation, eher 
schon die Addition! Doch lassen Sie uns wieder schrittweise Vorgehen: 
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11.2 Die Befehle SLA (HL) und RL (HL) 

Wir speichern in 1200... 1203 12 34 56 78 ein und wollen diese Zahlen 
um ein Bit nach links verschieben. Dazu stehen uns neben zahlreichen 
ähnlichen (siehe Z80-Handbuch) folgende Befehle zur Verfügung: 

SLA (HL) CB 26 (shift left arithmetical) verschiebt den Inhalt der 
indirekt adressierten Speicherstelle um ein Bit nach links. In das 0. Bit 
(ganz rechts) wird eine 0 nachgeschoben; das 7. Bit (ganz links) wird ins 
Carry-Bit geschoben. 

RL (HL) CB 16 (rotate left) bewegt die Bits in gleicher Weise, schiebt 
jedoch den momentanen Carry-Inhalt nach Bit 0 und holt Bit 7 ins 
Carry. Damit nimmt unser Programm folgende Gestalt an: 


PI 1.2. 

1 





1200 



12 

34 

56 76) 

20OO 

L.D 

HL,1203 

21 

03 

12 

2003 

SLA 

(HL) 

CB 

26 


2O05 

DEC 

HL 

2B 



2006 

RL 

(HL) 

CB 

16 


2008 

DEC 

HL 

2B 



2009 

RL 

(HL) 

CB 

16 


2O0B 

DEC 

HL 

2B 



200C 

RL 

(HL) 

CB 

16 


2O0E 

JP 

DUMP 12 

C3 

DR 

AF 


Was geschieht? 1200 12 34 56 78 

wird zu 1200 24 68 AC F0. 

Al 1.2.2 Rufen Sie dieses Programm mehrmals auf und deuten Sie, was 
hier geschieht! 

Al 1.2.3 Schreiben sie ab 2020 ein Programm, das ganz entsprechend 
den Speicherbereich 1200... 1203 um ein Bit nach rechts shiftet. 
Suchen Sie die betreffenden Befehle im Z80-Handbuch. Experimentie¬ 
ren Sie mit J2020 und J2000! 
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11.3 Schieben in Breite von 8 Bytes 

Wir bereiten eine Routine vor, die die ganze Datenzeile 1200... 1207 
um ein Bit nach links shiftet. Wir wollen diese Routine später anwen¬ 
den und “retten» vorsichtshalber die benutzten Register HL und BC auf 
den Stapel, damit - falls benötigt - der momentane Wert dieser Register 
nach Rückkehr aus der Routine wiederhergestellt ist. 


PI 1.3 

- 1 




2100 

PUSH 

HL 

E5 


2101 

PUSH 

BC 

C5 


2102 

LD 

HL,1207 

21 

07 

2105 

LD 

B, OB 

06 

08 

2107 

SCF 


37 


2108 

CCF 


3F 


2109 

RL 

(HL) 

CB 

16 

21 OB 

DEC 

HL. 

2B 


2 IOC 

DJNZ 

2109 

10 

FB 

21 OE 

PGP 

BC 

CI 


21OF 

POP 

HL... 

El 


2110 

RET 


C9 



Wodurch wurde hier das einsame SLA umgangen und dadurch das 
Programm vereinheitlicht? 

Al 1.3.2 Schreiben Sie ab 2120 die nach rechts schiebende Variante. 

11.4 Vervollständigung der Multiplikation 

Lassen Sie uns weiterplanen mit dem Ziel, zwei (bis zu) achtstellige 
Zahlen miteinander zu multiplizieren. Dabei sind maximal sechzehn¬ 
stellige Ergebnisse (also 8 Bytes) zu erwarten. Wir bezeichnen die Zeilen 
des Hexdumps wie folgt: 

1200.. . Zeile 1 enthält rechtsbündig Faktor 1 
1208 ... Zeile2 enthält rechtsbündig Faktor2 

1210.. . Zeile3 enthält das fertige Produkt 

1218.. . Zeile4 enthält Nullen (wegen Lesbarkeit) 

1220.. . Zeile5 wird Schieberegister für Bitprüfung 

1228.. . Zeileö dient zum Shiften von Faktor 2 
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Faktor 1 muß zunächst zur Bitprüfung nach Zeile5 und Faktor2 zum 
Linksshiften nach Zeile6 umgespeichert werden. Gleichzeitig wird 
Zeile3 auf null gesetzt, damit hier die einzelnen Zwischenprodukte 
aufaddiert werden können, und Zeile4 um der besseren Lesbarkeit 
willen. Das alles bewirkt 


F'l 1.4. 

1 





2140 

PUSH 

BC 

C5 



2141 

L.D 

IX,1200 

DD 

21 

00 

2145 

LD 

B, 10 

06 

10 


2147 

LD 

A, <1X4-00) 

DD 

7E 

00 

214A 

LD 

(IX+20) P A 

DD 

77 

20 

214D 

LD 

(IX+10),00 

DD 

36 

10 

2151 

INC 

IX 

DD 

23 


2153 

DJNZ 

2147 

10 

F2 


2155 

POP 

BC 

CI 



2156 

RET 


C9 




Als nächstes benötigen wir eine Routine, die von rechts angefangen 
jeweils 1 Byte von Zeileö und ein Byte von Zeile3 addiert und die 
jeweilige Teilsumme wieder nach Zeile3 ablegt: 


PI 1.4 

.2 





2160 

PUSH 

BC 

C5 



2161 

LD 

B, 08 

06 

08 


2163 

LD 

IX,1217 

DD 

21 

17 12 

2167 

SCF 


37 



2168 

CCF 


3F 



2169 

LD 

A, < I X +18) 

DD 

7E 

18 

216C 

ADC 

A,(IX+00) 

DD 

8E 

00 

216F 

LD 

(IX +00),A 

DD 

77 

00 

2172 

DEC 

IX 

DD 

2B 


2174 

DJNZ 

2169 

10 

F3 


2176 

POP 

BC 

CI 



2177 

RET 


C9 




Wir haben nun folgende Subroutinen bereitgestellt: 

2100 shiftet die Zeile 1 um 1 Bit nach links. Damit künftig Zeile6 in 
dieser Weise geshiftet wird, muß (2103) in 2F geändert werden. 

2120 shiftet die Zeile 1 um 1 Bit nach rechts. Damit künftig Zeile5 in 
dieser Weise geshiftet wird, muß (2123) in 20 geändert werden. 

2140 initialisiert die Rechenfelder und erwartet die Faktoren rechtsbün¬ 
dig in Zeile 1 und Zeile2. 
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2160 addiert jeweils den nach links geshifteten Faktor 2 zur momenta¬ 
nen Summe der bisherigen Teilprodukte. 

Wir können nun das Hauptprogramm bzw. die Koordinierung der 
Unterprogramme planen: 

1. Manuelle Eingabe der beiden Faktoren in Zeile 1 und Zeile2. 

2. Initialisieren der Rechenfelder: Routine 2140. 

3. Faktorl (in Zeile5) nach rechts shiften und danach Carry abfragen, ob 
Teiladdition erfolgen muß: Routine 2120. 

4. Wenn ja, dann Teiladdition durchführen: Routine 2160. 

5. Faktor2 (in Zeile6) nach links shiften wie das Multiplikationsschema 
in Abschnitt 10.3 vorschreibt: Routine 2100. 

6. Das Ganze (ab 3.) 32mal durchführen, weil die Multiplikation über 
eine Breite von 8 Nibbles = 32 bit durchzuführen ist. 

Damit nimmt unser Hauptprogramm Gestalt an: 


P11.4.3 


2000 

CALL 

2140 

CD 

40 

21 

2003 

L.D 

B, 20 

06 

20 


2005 

CALL 

2120 

CD 

20 

21 

2008 

JR 

WC,200D 

30 

03 


200A 

CALL 

2160 

CD 

60 

21 

200D 

CALL 

2100 

CD 

00 

21 

2010 

DJ WZ 

2005 

10 

F3 


2012 

JP 

DUMP12 

C3 

DF 

AF 


Wir haben damit ein schon ziemlich kompliziertes Gebilde geschaffen 
und sollten es sorgfältig testen. Einfache Beispiele wären: 

00 00 00 00 00 00 00 05 
00 00 00 00 00 00 00 07 
00 00 00 00 00 00 00 23h = 35d 

oder 

00 00 00 00 11 11 11 11 
00 00 00 00 11 11 11 11 
01 23 45 67 87 65 43 21. 
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Rotieren und Shiften 


Wir haben dieses Programm in Abschnitten geschrieben, um an und aus 
seiner modularen Struktur zu lernen. Vielleicht möchten Sie die Teile 
enger zusammenfügen? 

Al 1.4.4 Sind eigentlich alle PUSHs und POPs wirklich nötig? 
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Ein wenig Boolesche Algebra - 
oder auch angewandte Mengenlehre 


Einige Grundbegriffe der Booleschen Algebra haben in etwas veränder¬ 
ter Form Einzug in die Maschinensprache gehalten. Aus der Mengen¬ 
lehre stammt der Begriff «Schnittmenge», auch «Durchschnitt» 
genannt. Zur Schnittmenge gehören diejenigen Elemente zweier Men¬ 
gen, die in beiden Mengen enthalten sind. Fassen wir also einmal 
achtstellige Binärzahlen als Mengen auf, die maximal einen 128er, 
einen 64er, einen 32er, ... und einen 1er enthalten. 

12.1 Der Befehl AND bildet eine Schnittmenge 

Wenn wir nun in diesem Sinn die Schnittmenge von zwei Einbytezah¬ 
len bilden, kann das so aussehen: 

Erste Zahl: 0010 1101 hexadezimal 2D 

Zweite Zahl: 0101 1011 hexadezimal 5B 

Schnittmenge: 0000 1001 hexadezimal 09 

Der entsprechende Maschinenbefehl heißt AND: Die beiden Elemente 
8er UND 1er sind in beiden Zahlen (Mengen) 2D und 5B enthalten. 
Probieren Sie folgendes kurzes Programm aus und machen Sie sich mit 
seiner Hilfe mit dem Befehl AND vertraut. Dabei sollen die beiden 
vorgegebenen Zahlen (Operanden) aus 1200 und 1201 geholt und das 
Ergebnis in 1202 abgelegt werden. 

P .12.1. 1. 


2000 

LD 

HL,1200 

21 

2003 

LD 

A,(HL) 

7E 

2004 

INC 

HL 

**? 

2005 

AND 

(HL) 

A6 

2006 

INC 

HL 
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2007 LD (HL),A 77 

2008 JP DUMP12 C3 DF AF 

Beispiele: 2D AND 5B = 09, 7B AND 62 = 62. Denken Sie sich weitere 
aus und deuten Sie jedes bitweise. 

Anwendungen: Man nennt AND-Operationen manchmal «Maskie¬ 
ren». Durch «Undieren» mit einer «Maske» kann man bestimmte 
Informationen über eine Zahl erhalten. 

Al2.1.2 Suchen Sie geeignete Masken für folgende Feststellungen: 

a) Ist die Zahl gerade oder ungerade? 

b) Welchen Rest läßt sie nach Division durch 4, 8, 16, 32, 64, 128? 

c) Ist sie >127 bzw. negativ? 

Auf eine Besonderheit des Befehls AND A sei hingewiesen: Hier wird 
der Inhalt des Akkus mit sich selbst undiert. Sein Wert ändert sich 
dabei nicht, aber es geschehen zwei willkommene Dinge: 

1. Carry wird gelöscht. Das ersetzt SCF mit nachfolgendem CCF. 

2. Z-Flag wird je nach (A) gesetzt oder gelöscht. 


12.2 Befehle OR und XOR 

Gerd sagte: «Wenn Hans oder Franz kommt, gehen wir zum Schwim¬ 
men». Dieser Satz läßt zwei verschiedene Deutungen zu: 

OR Das einschließende Oder läßt auch zu, daß beide kommen: 
Gerd würde auch dann zum Schwimmen gehen. 

XOR Das exklusive Oder würde diesen Fall ausschließen. Wenn 
beide kämen, würde Gerd nicht zum Schwimmen gehen. 

Der Prozessor wendet diese Funktionen allerdings nicht auf sprachlich 
formulierte Sätze an, sondern auf Binärzahlen, wie bei AND erklärt, 
und mit folgenden Ergebnissen: 


0100 1001 
OR 0111 0011 
= 0111 1011 


0100 1001 
XOR 0111 0011 
= 0011 1010 
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Probieren Sie die beiden neuen Funktionen mittels P12.1.1 reichlich 
aus. Suchen Sie die Opcodes von OR (HL) und XOR (HL) im Z80- 
Handbuch! 

Al2.2.1 Schreiben Sie ein Programm, das das MSB einer in 1200 
stehenden Zahl mit nachfolgender Null in 1201 ablegt und das LSB mit 
führender Null nach 1202. 

Al2.2.2 Wenn der Akku mit 41 geladen ist, bewirkt CALL PRNT die 
Ausgabe eines «A». Es soll jedoch «41» ausgegeben werden. Schreiben 
Sie ein Programm, das eine in 1200 stehende Dezimalzahl auf dem 
Bildschirm ausgibt! 

A12.2.3 Erweitern Sie L12.2.3 so, daß auch Hexadezimalzahlen ausge¬ 
geben werden können! 
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l=il=il=il=ib=il=il=il=il=il=ii=ii=ii=n=ii=ii= ii=ni=i 


H 

lei n€? 

Xorr 

er ei 



KLXÜRI 

3000 

CD 

13 30 

CALL- 

XORINF 


3003 

CD 

1F 30 

CALL. 

XÜRCGL 


3006 

CD 

1F 30 

CALL 

XORCOL 


3009 

CD 

1.3 30 

CALL 

XORINF 


300C 

CD 

1F 30 

CALL 

XORCOL 


300F 

CD 

1F 30 

CALL- 

XORCOL. 


3012 

76 


HALT 


XGRINF 

3013 

21 

00 00 

L.D 

HL,D000 


3016 

06 

19 

LD 

B, 19 

LABEL 1. 

3018 

CD 

31 30 

CALL 

FLASH 


301B 

O’T 


INC 

HL 


30 IC 

10 

FA 

DJNZ 

LABEL1 


30 IE 

C9 


RET 


XORCOL 

301F 

21 

00 DB 

LD 

HL,D800 


3022 

06 

19 

LD 

B, 19 

LABEL2 

3024 

3E 

77 

LD 

A, 77 


3026 

AE 


XOR 

(HL) 


3027 

77 


LD 

(HL),A 


3028 

3E 

20 

LD 

A, 20 


302A 

CD 

B8 AF 

CALL 

WARTEN 


302D 

23 


INC 

HL 


302E 

10 

F4 

DJNZ 

LABEL2 


3030 

C9 


RET 


FLASH 

3031 

C5 


PUSH 

BC 


3032 

06 

19 

L.D 

B, 19 

LABEL3 

3034 

3E 

10 

LD 

A, 10 


3036 

CD 

B8 AF 

CALL 

WARTEN 


3039 

3E 

FF 

LD 

A,FF 


303B 

AE 


XOR 

(HL) 


303C 

77 


LD 

(HL),A 


303D 

10 

Firü 

DJNZ 

LABEL3 


303F 

CI 


POP 

BC 


3040 

C9 


RET 



Starten Sie das unveränderte Programm nach RESET 
o d er n ac; h J 0000 „ Das EBS muß g el ad en sein! 


Isibsils i 1 -—i 1 i 1 ~il=il=il=u=it=u— l 1 | I "'T—1‘— 
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Halbbytes-Swap 


Die Befehle RLD bzw. RRD (rotate left (bzw. right) decimal)) lösen 
einen Ringtausch von MSB und LSB der mittels HL indirekt adressier¬ 
ten Speicherstelle und dem LSB des Akkus aus. Er heißt Halbbytes- 
Swap. 

13.1 Dezimale Multiplikation 

Das Multiplikationsprogramm von Kapitel 11 kann nicht zur dezima¬ 
len Multiplikation verwendet werden, weil nicht alle Bits gleichberech¬ 
tigt geshiftet werden dürfen: Nibbles wie 1010, 1100 usw. dürfen nicht 
auftreten. An die Stelle des Shiftens und Rotierens tritt jetzt der 
Halbbytes-Swap. 

A13.1.1 Schreiben Sie ein Programm, das den Inhalt von 1201 links¬ 
herum swappen läßt. Der anfängliche Akku-Inhalt soll in 1200 bereitge¬ 
stellt werden. Ablage des Ergebnisses nach 1208 und 1209. 

Wir folgen nun wieder dem modularen Aufbau von Kapitel 11: 

A13.1.2 Schreiben Sie eine Routine, die Zeile6 um ein Nibble nach 
links swappt, von rechts eine Null nachschiebt und das höchstwertige 
Nibble verwirft. Beginnen Sie das Programm in 2100. 

A13.1.3 Schreiben Sic ab 2120 eine Routine, die ganz entsprechend 
ZeileS nach rechts swappt. 

Wir stellen jetzt sicher, daß sich die Unterprogramme PI 1.4.1 (ab 2140) 
und PI 1.4.2 (ab 2160) wieder an ihrem Platz befinden, und gehen an die 
Entwicklung des Hauptprogramms: 

1. Manuelle Eingabe der beiden Faktoren in Zeile 1 und Zeile2. 

2. Initialisieren der Rechenfelder: Routine 2140. 

3. Faktorl (in Zeile5) nach rechts swappen und Akku mit 0F maskieren, 
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damit nur das hinausgeschobene Nibble übrigbleibt. Es bestimmt, ob 
und wie oft addiert werden muß. 

4. Wenn A = 0, dann Mehrfachaddition überspringen, sonst (A) nach B 
transferieren und (B)-mal addieren: Routine 2160. 

5. Faktor2 (in Zeile6) nach links swappen: Routine 2100. 

6. Das Ganze (ab 3.) achtmal, weil unsere Faktoren (bis zu) 8 Nibbles 
breit sind. Damit sieht unser Hauptprogramm so aus: 

P13.1.4 


2O0O 

CALL 

2140 

CD 

40 

21 

; i ni t i al i sieren 

2003 

LD 

B, 08 

06 

08 



2005 

CALL 

2120 

CD 

20 

21 

;nach rechts sh. 

2008 

AND 

OF 

E6 

0F 


;Zero~Flag ~ ? 

20OA 

JR 

Z,2014 

28 

08 



20OC 

PUSH 

BC 

C5 




2O0D 

LD 

B, A 

47 




20OE 

CALL 

2160 

CD 

60 

21 

; addieren 

2011 

DJNZ 

20OE 

10 

FB 


\ 

2013 

POP 

BC 

CI 




2014 

CALL 

2100 

CD 

00 

21 

5 nach links sh. 

2017 

DJNZ 

2005 

10 

EC 



2019 

JP 

DUMP12 

C3 

DF 

AF 



Probieren Sie wieder viele Beispiele aus ; zwei zur Kontrolle: 

1000 * 1000 = 01000000 (hex) 

03E8 * 03E8 = 000F4240 (hex) 

Wir können nun die Hexadezimalmultiplikation in eine Dezimalmulti¬ 
plikation überführen, indem wir in die Additionsroutine 2160 ein DAA 
einfügen. Wir benutzen dabei ganz bewußt den Befehl AND A (vgl. 
Abschnitt 12.1) zum Löschen von Carry-Flag und stellen uns vor, die 
Additionsroutine stände oben und unten eng ins Programm einge¬ 
schlossen. Dann käme uns der Gewinn eines Bytes (27 statt 37 3F) sehr 
zustatten, denn wir hätten Platz für DAA, für das wir keinen Platzhal¬ 
ter (NOP) bereitgestellt hatten. 


PI 3.1.5 


2167 

AND 

A 

A7 

" 

" 

2168 

LD 

A,(IX+18) 

DD 

7E 

18 

216B 

ADC 

A, (IX +00) 

DD 

8E 

00 

216E 

DAA 


27 



2174 

DJNZ 

2168 

10 

F2 
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Weitere Monitor- und EBS-Routinen 
zur Erhöhung des Ein-/Ausgabe-Komforts 


Wir haben bisher stets die zu verarbeitenden Daten in unserem Arbeits¬ 
bereich ab 1200 abgelegt und danach das Verarbeitungsprogramm aufge¬ 
rufen. Es erhebt sich die Frage, ob man die Daten nicht auch unter 
Programmkontrolle eingeben kann, so daß sich die Ausführung eines 
Programms vereinfacht. 


14.1 Die Monitorroutine GETKY 

Der hervorragend dokumentierte Monitor des MZ-700 bietet zwei 
komfortable Eingaberoutinen an, HLHEX und 2HEX. Lesen Sie auf 
jeden Fall die Kommentare dazu. Wir benutzen diese beiden Routinen 
hier nicht, sondern versuchen zu verstehen, wie derartiges vor sich 
geht, indem wir selber ähnliche Routinen aufstellen. 

Wir hatten in P8.2.1 und PAUSKY bereits die Routine GETKY 
benutzt. Wir untersuchen sie jetzt näher: 


FT 4. 1. 1 


3000 

CALL NULL 12 

CD 

F4 

AF 

3003 

LD HL., 1200 

21 

00 

12 

3006 

CALL GETKY 

CD 

1B 

00 

3009 

LD (HL),A 

77 



300A 

INC HL 

23 



300B 

CALL GETKY 

CD 

1B 

00 

300E 

LD (HL), A 

77 



300F 

INC HL 

jü * 2 .*» 



30 1 0 

CALL GETKY 

CD 

1B 

00 

3013 

LD (HL),A 

77 



3014 

JP DUMP12 

C3 

DF 

AF 


Das Ergebnis ist erstaunlich. Tippen wir J3000 ein und drücken wir nur 
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sehr kurz (CR), dann erhalten wir 00 00 00 .Drücken wir (CR) 

jedoch länger, erhalten wir bis zu dreimal 66. Das muß untersucht 
werden: Starten wir das Programm noch einmal und drücken dabei 
(CR) nur sehr kurz und sofort anschließend die Taste «A», dann kann 
es uns mit Geschick und Glück gelingen, auch einmal 66 41 41 .. .. zu 
erhalten. Vielleicht verlängern Sie das Programm noch ein wenig? Und 
dann erweitern wir es der Größe des Anzeigefelds entsprechend auf 160 
Eingaben: 

F'l 4 - 1.2 


3000 

CALL 

NULL12 

CD 

F4 

AF 

3003 

L.D 

HL,1200 

21 

00 

12 

3006 

LD 

B, AO 

06 

AO 


300ö 

CALL 

GETKY 

CD 

1B 

00 

30 OB 

LD 

(HL),A 

77 



300C 

INC 

HL 

DT 

X. Sh‘ 



30 OD 

DJNZ 

3008 

10 

F9 


30 OF 

JP 

DUMP12 

C3 

DF 

AF 


Wenn wir nun J3000 eintippen und dann ohne besondere Hast nachein¬ 
ander die Tasten CR, 1, 2, 3, 4, 5, .. drücken, zeigt der Hexdump je 
einige Male 66, 00, 31, 32, 33, 34, 35, .. an. Das verrät uns folgendes: 

1. Die Tastatur wird vom Programm in mäßig schneller Folge mehr¬ 
mals hintereinander abgefragt. 

2. Eine gedrückte Taste wird dabei mehrfach registriert. 

3. 66 ist die Codierung von CR 

00 ist die Codierung von «keine Taste» 

31 ist die Codierung von «1» usw. 

Sehen Sie sich dazu den Kommentar zu GETKY im Sharp-Handbuch an. 


14.2 Tastaturentprellung per Software 

Wir sind damit an ein wichtiges Teilproblem der Tastaturabfrage 
gelangt: Ermittelt diese (festgestllt von GETKY) den Code 66, so könnte 
der noch von einem früheren CR stammen; neue Abfrage! Nach «CR» 
müßte zunächst einmal «keine Taste» festgestellt werden. Dann muß 
erneut abgefragt werden, bis eine «gültige» Taste gedrückt wird. Nun 
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haben Metallteile, die man schnell aneinanderpreßt, es an sich, zu 
«prellen», bis sie endlich ruhig einander berühren, ln dieser Phase muß 
abgewartet werden, bis der schnelle Wechsel von Nullen und gültigen 
Werten abgeklungen ist. Wir ermitteln das, indem wir den jeweils 
ermittelten vielleicht gültigen Code in C laden und mit dem nächsten 
erhaltenen Code vergleichen. Bei Gleichheit nehmen wir an, jetzt den 
wirklich gültigen Code gefunden zu haben. Der Vorgang ist abgeschlos¬ 
sen, wenn «keine Taste» fcstgcstcllt wird. 

Wir schreiben jetzt ein Programm, das achtmal die «Tastaturentprcl- 
lung» softwaremäßig vollzieht und die Eingaben zu unserer Kontrolle 
und Deutung nach 1200... 1207 abspeichert: 

P14.2. :l 


3O0O 

CALL 

NULL 12 

CD 

F4 

AF 


3003 

L..D 

HL,1200 

21 

00 

12 

;An fan g sa d resse 

3006 

LD 

B, 08 

06 

08 


58 Durchläufe 

300B 

CALL 

GETKY 

CD 

1 B 

00 


300B 

AND 

A 

A7 



:prüfen, ob 00 

300C 

JE 

Z,3008 

28 

FA 


;wenn 00 zurück 

300E 

CP 

66 

FE 

6 6 


;prüfen, ob CE 

30 1 0 

JE 

Z,3008 

28 

Tj 

0 ' 


; wenn CE zur üc: k 

3012 

LD 

C „ 00 

0 E 

00 


$ Auf angswer t: 

3014 

CALL 

GETKY 

CD 

1 B 

00 


3017 

CP 

C 

B9 



5 A * C ? 

3018 

LD 

C, A 

4F 



; nach C zwi •’ sp. 

3019 

JE 

NZ,3014 

20 

F9 


;wenn <> zurück 

301B 

LD 

(HL),A 

77 



;abspeichern 

30 IC 

INC 

HL 

O 




301 D 

CALL 

GETKY 

CD 

1 B 

00 


3020 

AND 

A 

A7 



;prüfen ob 00 

3021 

JE 

NZ,30ID 

20 

FA 


; w e n n < > z u r ü c k 

3023 

DJNZ 

3008 

10 

E3 


; n © u e r D u r c: h 1 a u f 

3025 

JP 

DUMP 12 

C3 

DF 

AF 



Unser Programm arbeitet korrekt, auch wenn wir z. B. A, A, B, B, C, C, 
D, D eingeben. (Probieren Sic aus, ob beim MZ-700 die Feststellung der 
Konstanz der Tastaturabfrage nötig ist, indem Sic 3012...301A mit 
NOPs überschreiben.) Das Monitorprogramm enthält bereits eine ent¬ 
sprechende Routine, sie heißt ??KEY (09B3), und wir probieren sie 
sogleich aus: 
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P14.2. 

.2 





3O30 

CALL 

NULL12 

CD 

F4 

AF 

3033 

LD 

HL,1200 

21 

00 

12 

3036 

LD 

B, 08 

06 

08 


3038 

CALL 

77KEY 

CD 

B3 

09 

303B 

LD 

(HL),A 

77 



303C 

INH 

HL 

23 



303D 

DJNZ 

3038 

10 

F9 


303F 

JP 

DUMP12 

C3 

DF 

AF 


An der Routine ??KEY gefällt uns: 

1. Sie liegt bereits fertig vor. 

2. Der Cursor zeigt die Schreibposition an. 

Für unsere Zwecke vermissen wir: 

1. ??KEY liefert nicht den ASCII-, sondern den Anzeigecode. 

2. Die Eingabe wird nicht angezeigt. 

Al4.2.3 Schreiben Sie PI4.2.2 so um, daß es auch in diesen Punkten 
unseren Vorstellungen entspricht. Benutzen Sie dazu ?DACN (siehe 
Sharp-Handbuch Seite 155). 


14.3 Die EBS-Routinen KYECH und CLS 

L14.2.3 läuft einwandfrei. Geben Sie auch einmal ein 1, 2, (CR), 3, ... . 
CR wird wieder als 66 codiert. Uns gefällt diese Kombination, so daß 
wir sie sogleich zu einer EBS-Routine KYECH umschreiben. KYECH 
soll heißen «Key mit Echo», wobei man unter «Echo» versteht, daß das 
eingegebene Zeichen auch auf dem Bildschirm ausgegeben wird. 


P14.3.1 


KYECH 


AFA7 

CALL 

77KEY 

CD 

B3 

09 

AFAA 

CALL 

7DACN 

CD 

CE 

0 B 

AFAD 

PUSH 

AF 

F5 



AFAE 

CALL 

PRNT 

CD 

12 

00 

AFB1 

POP 

AF 

Fl 



AFB2 

RET 


C9 




Wir lassen sofort noch eine Routine CLS folgen, die im wesentlichen 
aus einem Steuerzeichen mit nachfolgendem PRNT besteht: 
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AF9F 

PUSH 

AF 

F5 

AFA0 

LD 

A, 16 

3E 16 

AFA 2 

CALL 

PRNT 

CA 12 00 

AFA5 

POP 

AF 

Fl 

AFA6 

RET 


C9 


Wir saven mit SAF9FAFFF0000 - EBS und überprüfen das Erreichte mit 
einem Kurzprogramm: 


FT 4« 3 

2000 

CALL 

NULL 12 

CD F4 

AF 

2003 

CALL 

CLS 

CD 9F 

AF 

2006 

CALL 

KYECH 

CD A7 

AF 

2009 

LD 

(1200),A 

32 00 

1.2 

200C 

JP 

DUMP12 

C3 DF 

AF 


14.4 Die EBS-Routine INBYTE 

Es kommt häufig vor, daß eine zweistellige Hexadezimalzahl, also ein 
Byte, einzugeben ist. Soll z. B. A5 eingegeben werden, so wären dazu die 
Tasten «A» und «5>» zu drücken, und KYECH würde 41 und 35 als 
Eingaben registrieren. Diese beiden Teile sind nun wieder zu «A5» 
zusammenzusetzen. Wir tun das zunächst, ohne zu prüfen, ob bei der 
Eingabe eines jeden Nibbles ganz korrekt keine andere als eine der 
Tasten 0... 9 bzw. A... F gedrückt wurde. Das Programm muß von 
folgender Struktur sein: 

1. Eingabe der ersten Ziffer. 

2. Wenn ASCII > 40, dann von 41 auf 4A, von 42 auf 4B, ... von 46 auf 
4F, also um 9 erhöhen. 

3. Um 4 bit nach links shiften und Zwischenspeichern. 

4. Eingabe der zweiten Ziffer. 

5. wie 2. 

6. Mit 0F maskieren. 

7. Zum zwischengespeicherten Wert addieren. 

8. Abspeichern. 
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Ti 

1 





3100 

CALL 

KYECH 

CD 

A7 

AF 

3103 

CALL 

31 IE 

CD 

IE 

31 

3106 

SLA 

A 

CB 

27 


3108 

BLA 

A 

CB 

27 


310A 

SLA 

A 

CB 

27 


310C 

BLA 

A 

CB 

27 


31 OE 

LD 

B, A 

47 



310F 

CALL 

KYECH 

CD 

A7 

AF 

31 12 

CALL 

31 IE 

CD 

IE 

31 

31 15 

AND 

OF 

E6 

OF 


31 17 

ADD 

A, B 

80 



3118 

LD 

(1200),A 

32 

00 

12 

31 1B 

JP 

DUMP12 

C3 

DF 

AF 

31 IE 

CP 

40 

FE 

40 


3120 

RET 

C 

D8 



3121 

ADD 

A, 09 

C6 

09 


3123 

RET 


C9 




Bei aller Nützlichkeit weist diese Lösung noch den u. U. gefährlichen 
Mangel auf, daß auch falsche Eingaben wie z. B. «XY», «7G», >•(!>> usw. 
angenommen werden. Probieren Sie das bitte aus. Die Deutung ist gar 
nicht schwer. 

Zur Erkennung derartiger Eingabefehler formulieren wir nun eine 
Routine INBYTE, die mittels KYECH zwei Nibbles von der Tastatur 
aufnimmt und jedes prüft, ob es zulässiger Bestandteil einer zweistelli¬ 
gen Hexadezimalzahl ist. Dazu wird das eingelesene Halbbyte mit einer 
Tabelle verglichen, die die zulässigen Codes 30...39 und 41...46 
enthält. Zum Umwandcln dieser Codes in das jeweils aufzubauende 
Nibble beginnen wir im D-Register mit 00 und inkrementieren nach 
jedem erfolglosen Vergleich. Das zuerst ermittelte Halbbyte wird in C 
zwischengespeichert und viermal nach links geshiftet; anschließend 
wird das zweite ermittelt und addiert. Wurde eine Eingabe mit allen 16 
Elementen der Tabelle ergebnislos verglichen, ist sie unzulässig. Drei 
Piepstöne zeigen das an, und der Cursor wird mittels Stcuercode C4 und 
Monitorroutine ?DPCT (Seite 155 des Sharp-Handbuchs) auf das Echo 
der Fehleingabe zurückbewegt. 

Wir verlegen INBYTE sofort an den richtigen Ort und verwenden von 
hier ab mehr als bisher Ausdrucksweisen der Assemblersprache, um Sie 
allmählich auch mit ihr bekanntzumachen. Die symbolischen Adres¬ 
sen - auch Labels genannt - sind Programmiervariable: Sie können z. B. 
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«EIN» in diesem Sinne als eine Variable mit dem Wert AF6F auffassen. 
Tippen Sie das Programm nicht einfach ab, sondern versuchen Sie, es 
anhand der gegebenen Erklärungen Schritt für Schritt zu verstehen. 


P14 m 4 . 2 
INBYTE 

AF57 

PUSH 

BC 


AF58 

PUSH 

DE 


AFS 9 

PUSH 

HL 


AF5A 

CALL 

EIN 


AF5D 

LD 

C, D 


AF5E 

SL.A 

C 


AF60 

BLA 

C 


AF62 

BLA 

C 


AF64 

SLA 

C 


AP" 6 6 

CALL 

EIN 


AF69 

LD 

A, C 


AF6A 

ADD 

A, D 


AF6B 

PGP 

HL 


AF6C 

POP 

DE 


AF6D 

POP 

BC 


AF6E 

RET 


EIN 

AF6F 

CALL 

KYECH 


AF72 

LD 

HL, TABI 


AF75 

LD 

B, 10 


AF77 

LD 

D,00 

LABEL 

AP“ 7 9 

CP 

(HL.) 


AF7A 

RET 

7 


AF7B 

INC 

HL. 


AF7C 

INC 

D 


AF7D 

DJNZ 

LABEL 


AF7F 

CALL 

BELL. 


AF82 

CALL 

BELL 


AF85 

CALL 

BELL 


AF88 

LD 

A,C4 


AF8A 

CALL 

7DPCT 


AF8D 

JR 

EIN 

TABLE 

AF8F 

AF97 




C5 
D5 
E 5 

CD 6F AF 
4A 

CE< 21 
CB 21 
CB 21 
CB 21 
CD 6F AF 
79 
82 
El 
Dl 
CI 
C9 

CD A7 AF 

21 8F AF 

06 10 
16 00 
BE 
CB 
23 
14 

10 FA 
CD 3E 00 

CD 3E 00 

CD 3E 00 

3E C4 5 Cursor links 
CD DC 0C 
18 E0 

30 31 32 33 34 35 36 37 

38 39 41 42 43 44 45 46 


Wir testen das Erreichte mit einem Kurzprogramm: 
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P14.4.3 


TEST 

2000 

LD 

B, 08 

06 

08 



2002 

LD 

HL,1200 

21 

00 

12 

LABEL1 

2005 

CALL 

INBYTE 

CD 

57 

AF 


20O8 

L.D 

(HL),A 

77 




2009 

INC 

HL 

23 




200A 

DJNZ 

LABEL1 

10 

F9 



20OC 

JP 

DUMP12 

C3 

DF 

AF 


14.5 Die EBS-Routinen 
IN2HEX, IN4HEX und IN6HEX 

In der Praxis sind häufig nicht zweistellige, sondern vierstellige und 
manchmal sogar sechsstellige Hexadezimalzahlen einzugeben und in 
von Neumannscher Anordnung abzulegen. Letzteres erreichen wir, 
indem wir die Zieladresse des MSB nach HL laden und das MSB dann 
indirekt nach dort ablegen. Danach wird HL dekrementiert, das LSB 
eingegeben und ebenfalls indirekt abgelegt. 

Al4.5.1 Schreiben Sie ein Programm nach diesen Angaben und ordnen 
Sie es wie immer vor dem EBS ein! 


14.6 Die EBS-Routine OUTBYT 

Wer A sagt, muß auch B sagen, und auf INBYTE folgt OUTBYT. Diese 
Routine soll ein im Akku stehendes Byte auf dem Bildschirm ausgeben. 
Dazu sind beide Nibbles in ASCIIs zu verwandeln. Das besorgt die 
Monitorroutine ASC (siehe Sharp-Handbuch). 

A14.6.1 Entwerfen Sie eine EBS-Routine, die das leistet. Der Raum von 
AF30 bis AF46 genügt! 

Al4.6.2 Wir müssen OUTBYT auf Zuverlässigkeit untersuchen. Spei¬ 
chern Sie in 1200... 1207 Zahlen ein, die mittels OUTBYT auf den 
Bildschirm geschrieben werden. Schreiben Sie ein geeignetes Kurzpro¬ 
gramm! 
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14.7 Die EBS-Routinen 
OUT2HX, OUT4HX und OUT6HX 

Al4.7.1 Schreiben Sie einen INnHEX entsprechenden Dreierblock, der 
ganz analog 3, 2 oder 1 Byte(s) ausgibt. Der Speicherraum von AF20 bis 
AF2F genügt! 

Al4.7.2 Schreiben Sie ein hübsches Kurzprogramm, das IN6HEX und 
OUT6HX in je einer fünfmal zu durchlaufenden Schleife testet. Legen 
Sie Wert auf gute Überschaubarkeit! 


14.8 Die EBS-Routine OUTBIN 


Wir bereiten jetzt eine Routine vor, die das im Akku stehende Byte als 
Binärzahl ausgibt. Wir gehen wieder schrittweise vor und holen uns 
eine Zahl aus 1200, von der wir zunächst nur die beiden ersten Bits 
ausgeben: 


P14.8. 

1 





2000 

LD 

A, (1200) 

3A 

00 

12 

2003 

L..D 

B, 00 

06 

00 


2005 

SLA 

A 

CB 

27 


2007 

RL 

B 

CB 

10 


2009 

SLA 

B 

CB 

20 


200B 

SLA 

B 

CB 

20 


200D 

SLA 

B 

CB 

20 


200F 

S5LA 

A 

CB 

27 


2011 

RL 

B 

CB 

10 


2013 

LD 

A, B 

78 



2014 

CALL 

OLJTBYT 

CD 

30 

AF 

2017 

CALL 

FAUSWK 

CD 

D4 

AF 

201A 

JP 

DUMP12 

C3 

DF 

AF 


Al4.8.2 Bitte überlegen Sie: 

a) Was bewirken die Befehle in 2005 und 2007? 

b) Was bewirken die drei SLA Bs in 2009... 200B? 

c) Was geschieht in 200F? 

d) Was geschieht in 2011? 

e) Weshalb ist 2013 unbedingt nötig? 
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Hier folgt ein Programm, das in endloser Folge zweistellige Hexadezi¬ 
malzahlen aufnimmt und als Binärzahlen ausgibt: 


P14.8.3 


TSTBIN 

3000 

CALL 

INBVTE 

CD 

57 

AF 


3003 

LD 

C, A 

4F 




3004 

CALL 

PRINTS 

CD 

OC 

00 


3007 

CALL 

BITBIT 

CD 

1B 

30 


300A 

CALL 

BITBIT 

CD 

1B 

30 


300D 

CALL 

PRINTS 

CD 

OC 

00 


3010 

CALL 

BITBIT 

CD 

1B 

30 


3013 

CALL 

BITBIT 

CD 

1B 

30 


3016 

CALL 

LETNL 

CD 

06 

00 


3019 

JR 

TSTBIN 

18 

E5 


BITBIT 

301B 

LD 

B, 00 

06 

00 



301D 

SLA 

C 

CB 

21 



301F 

RL. 

B 

CB 

10 



3021 

SLA 

B 

CB 

20 



3023 

SLA 

B 

CB 

20 



3025 

SLA 

B 

CB 

20 



3027 

SLA 

C 

CB 

21 



3029 

RL 

B 

CB 

10 



302B 

LD 

A, B 

78 




302C 

CALL 

OUTBYT 

CD 

30 

AF 


302F 

RET 


C9 




Al4.8.4 Überlegen Sie, ohne zum Programmanfang zu schauen: 

a) Was enthält der Programmzähler (PC) zu Beginn des relativen 
Sprungs in 3019? 

b) Wie errechnet sich aus PC und dem Offset E5 die Zieladresse dieses 
Sprungs? 

Al4.8.5 Schreiben Sie PI4.8.3 zur EBS-Routine OUTBIN um, der das 
auszugebende Byte im Akku übergeben wird. Welches Register muß 
während des Ablaufs gesichert werden? - Der Raum AEF8...AF1F 
genügt. 

Al4.8.6 Schreiben Sie ein Kurzprogramm zum Testen von OUTBIN! 
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Umwandeln von einem Zahlensystem 
in ein anderes 


In der Praxis des Programmierern hat man es vor allem mit Binär-, 
Dezimal- und Hexadezimalzahlen zu tun. Häufig sind Zahlenwerte aus 
der einen Darstellung in die andere umzurechnen. Neben den genann¬ 
ten lassen sich beliebig viele andere Zahlensysteme konstruieren. 


15.1 Umwandeln einer Hexadezimalzahl 
in eine Dezimalzahl 

Man kann eine Hexadezimalzahl verdoppeln (vervierfachen, verachtfa¬ 
chen usw.), indem man sie um 1 (2, 3 usw.) Stellen nach links shiftet. 
Der Leser denke sich dazu Beispiele aus und realisiere sie mit geeigne- 
ten Programmen. 

Man kann eine Dezimalzahl nicht immer durch Shiften (und Rotie- 
ren) verdoppeln, weil nicht alle Bits gleichberechtigt sind bzw. weil 
dabei -Pseudotetraten” auftreten können; das sind Bitmuster, die kei¬ 
ner dezimalen Ziffer entsprechen. Man kann aber Dczimalzahlen ver¬ 
doppeln, indem man sie zu sich selbst addiert und dann mit DAA 
dezimal adjustiert. Addiert man mit ADC, dann kommt zur Summe - je 
nach Carry - noch 1 hinzu. Das läßt sich praktisch anwenden, denn 
man kann ja den Wert z. B. der Binärzahl 10110 auch so berechnen: 

10110 =1*16 + 0*8+1*4+1*2 + 0*1 
= (((1 *2 + 0 ) * 2 + 1 ) * 2 + 1 ) *2 + 0 

Mit anderen Worten: Man kann eine Binärzahl auch als Polynom 
auffassen und seinen Wert nach dem Hornerschen Schema berechnen, 
indem man wiederholt verdoppelt und je nach Maßgabe der Binärzahl 0 
oder 1 addiert. Wir benutzen das zu einer trickreichen Umwandlung 
von hexadezimal (vierstellig) nach dezimal (sechsstellig). Vgl. dazu auch 
E. Flögel in «Elcomp» 2/83, S. 97. 
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Unser Programm soll die mit MSB in 1200 und LSB in 1201 gut lesbar 
angeordnete vierstellige Hexadezimalzahl in eine Dezimalzahl umwan¬ 
deln und diese - ebenfalls gut lesbar angeordnet - nach 1202... 1204 
ablegen. Wir setzen es wieder aus einzelnen Abschnitten zusammen: 

PI5.1.1 shiftet die Hexadezimalzahl um 1 bit nach links und transpor- 


tiert Bit 15 ins Carry: 





PI5.i. 1 





SHILKS 2100 

LD 

HL,1201 

21 

01 

2103 

SLA 

(HL) 

CB 

26 

2105 

DEC 

HL 

2B 


2106 

RL 

(HL) 

CB 

16 

2108 

RET 


C9 


PI5.1.2 setzt das Zielfeld auf null: 



P15.1.2 





ZFNULL 2120 

XOR 

A 

AF 


2121 

LD 

HL., 1202 

21 

02 

2124 

LD 

X 

r 

2> 

77 


2125 

INC 

HL 

23 


2126 

LD 

(HL) , A 

77 


2127 

INC 

HL 

23 


2128 

LD 

(HL) , A 

77 


2129 

RET 


C9 



P15.1.3 verdoppelt den Inhalt der Ergebnisbytes durch Dezimaladdition 
mit Carry: 


PI5-1.3 


ZFDOPC 

2140 

LD 


2143 

CALL 


2146 

CALL 


2149 

CALL 


214C 

RET 

SUBRUT 

214D 

LD 


21 4E 

ADC 


214F 

DAA 


2150 

LD 


2151 

DEC 


2152 

RET 


HL,1204 

21 

04 

12 

SUBRUT 

CD 

4D 

21 

SUBRUT 

CD 

4D 

21 

SUBRUT 

CD 

4D 

21 


C9 



A,(HL) 

7E 



A,(HL) 

8E 




27 



(HL),A 

77 



HL 

2B 




C9 
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Damit vereinfacht sich das Hauptprogramm zu 


FT 5. 1 - 4 

HEXDEZ 2O0O 

CALL 

ZFNULL 

CD 

20 

21 

2003 

LD 

B, 10 

06 

10 

;16mal 

LABEL 2005 

CALL 

SHILKS 

CD 

00 

21 

.2008 

CALL 

ZFDOF'C 

CD 

40 

21 

200B 

DJNZ 

LABEL 

10 

F8 


20OD 

JP 

DUMP12 

C3 

DF 

AF 


Wir überzeugen uns von der korrekten Arbeit des Programms. Kontroll- 
beispiele könnten u. a. sein: 

FFFFh = 65535d, 1234h = 4660d. Denken Sie sich weitere aus! 

Al5.1.5 Machen Sie dazu ein «schönes» Hauptprogramm mit Eingabe 
durch 1N4HEX und Ausgabe durch OUT6HX. Welche Programmteile 
sind dazu zu ändern? 

Für das EBS bauen wir das Programm noch etwas komfortabler aus: 
FT5.1.6 


HEXDEZ 

AE92 

1 1 

El 

AE 

CD 

ED 

AF 

21 

01 

12 

CD 

4C 

AF 


AE9E 

CD 

0C 

00 

CD 

B9 

AE 

06 

10 

CD 

C4 

AE 

CD 


AEAA 

CD 

AE 

10 

F8 

21 

04 

12 

CD 

20 

AF 

CD 

06 


AEB6 

00 

18 

DF 










HDNULL 

AEB9 

AF 

06 

03 

21 

02 

12 

77 

23 

10 

FC 

C9 


HDSHLK 

AEC4 

21 

00 

12 

CB 

26 

23 

CB 

16 

C9 




HDDOF'C 

AE CD 

21 

02 

12 

CD 

DC 

AE 

23 

CD 

DC 

AE 

H7 

aU. 

CD 


AED9 

DC 

AE 

C9 










SRDOF’C 

AEDC 

7E 

8E 

27 

77 

C9 








TABL.E 

AEE1 

16 

55 

B3 

A3 

Al 

BO 

9C 

B8 

A5 

BO 

97 

20 


AEED 

48 

45 

58 

20 

2D 

3E 

20 

44 

45 

5A 

0D 



15.2 Eine andere Hex-Dez-Umwandlung 

Wir stellen zunächst eine weniger «schöne» Lösung vor, die auch zum 
Ziel führt. Der Leser wird dann gebeten werden, das angewendete 
Verfahren zur Dez-Hex-Umwandlung umzukehren. Auf der Suche nach 
einem eleganteren Verfahren analysieren wir den Befehl DAA. Zum 
Abschluß dieses Themas lernen wir eine P15.1.n entsprechende schö¬ 
nere Lösung kennen. 
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Man kann die Hexadezimalzahl uvwx in eine Dezimalzahl umwan¬ 
deln, indem man Anfangswert 000000 u-mal 4096, v-mal 256, w-mal 16 
und x-mal 1 dezimal hinzuaddiert. 

Speicherdisposition: 

1200.. . 1201: vierstellige Hexadezimalzahl. 

1202.. . 1204: Ergebnisfeld, anfangs alles auf null. 

1205 ... 1207: Hier stehen die aktuellen Stellenwerte. 

Wieder zunächst die benötigten Unterprogramme: 

EFNULL setzt das Ergnisfeld auf Null. 

HXSWAP swappt die Hexadezimalzahl um ein Nibble nach links. 
SWnnnn: Diese Subroutinen erzeugen den jeweiligen Stellenwert. 
ADEFSW addiert zum Ergebnisfeld den momentanen Stellenwert. 


P15.2.1 


EFNULL 

2100 

LD 

HL,1202 

21 

02 

12 


2103 

XÜR 

A 

AF 




2104 

LD 

<HL),A 

77 




2105 

INC 

HL 

23 




2106 

LD 

< HL) ,A 

77 




2107 

INC 

HL 

23 




2108 

LD 

(HL),A 

77 




2109 

RET 


C9 



HXSWAP 

210A 

XÜR 

A 

AF 




210B 

LD 

HL,1201 

21 

01 

12 


21 OE 

RL.D 


ED 

6F 



2110 

DEC 

HL 

2B 




2111 

RLD 


ED 

6F 



2113 

LD 

B, A 

47 




2114 

RET 


C9 



SW4096 

2115 

XÜR 

A 

AF 




2116 

L..D 

(1205),A 

32 

05 

12 


2119 

LD 

HL,9640 

21 

40 

96 

LABLSW 

21 IC 

LD 

(1206),HL 

oo 

06 

12 


211F 

RET 


C9 



SW0256 

2120 

LD 

HL,5602 

21 

02 

56 


2123 

JR 

LABLSW 

18 

F7 


SW0016 

2125 

LD 

HL,1600 

21 

00 

16 


2128 

JR 

LABLSW 

18 

F2 


SW0001 

212A 

LD 

HL,0100 

21 

00 

01 


212D 

JR 

LABLSW 

18 

ED 


ADEFSW 

212F 

PUSH 

BC 

C5 




2130 

LD 

B, 03 

06 

03 
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21 32 

L.D 

IX,1204 

DD 

21 

04 12 

2136 

AND 

A 

A7 



LABADD 2137 

LD 

A,(IX+00) 

DD 

7E 

00 

213A 

ADC 

A,(IX+03) 

DD 

8 E 

03 

213D 

DAA 


27 



213E 

LD 

(IX+00),A 

DD 

77 

00 

2141 

DEC 

IX 

DD 

2B 


2143 

DJNZ 

LABADD 

10 

f 2 


2145 

POP 

BC 

CI 



2146 

RET 


C9 




Diese Routinen koordiniert das Hauptprogramm: 


P15.2.2 


HXDEZ2 

2000 

CALL 

EFNULL 

CD 

00 

21 


2003 

CALL 

HXSWAP 

CD 

0 A 

21 


2006 

AND 

A 

A7 




2007 

JR 

Z,LABEL2 

28 

08 



2009 

CALL 

SW4096 

CD 

15 

21 

LABEL1 

200C 

CALL 

ADEFSW 

CD 

2 F 

21 


200 F 

DJNZ 

LABEL1 

10 

FB 


LABEL2 

201 1 

CALL 

HXSWAP 

CD 

0 A 

21 


2014 

AND 

A 

A7 




2015 

JR 

Z,LABEL4 

28 

08 



2017 

CALL 

SW0256 

CD 

20 

21 

LABEL3 

201 A 

CALL 

ADEFSW 

CD 

2F 

21 


201 D 

DJNZ 

LABEL3 

10 

FB 


LABEL4 

201 F 

CALL 

HXSWAP 

CD 

0 A 

21 


2022 

AND 

A 

A7 




2023 

JR 

Z,LABEL 6 

28 

08 



2025 

CALL 

SW0016 

CD 

25 

21 

LABELS 

2028 

CALL 

ADEFSW 

CD 

2F 

21 


202 B 

DJNZ 

LABELS 

10 

FB 


LABEL 6 

202D 

CALL 

HXSWAP 

CD 

0 A 

21 


2030 

AND 

A 

A7 




2031 

JR 

Z,LABELS 

28 

08 



2033 

CALL 

SW0001 

CD 

2A 

21 

LABEL7 

2036 

CALL 

ADEFSW 

CD 

2F 

21 


2039 

DJNZ 

LABEL7 

10 

FB 


LABELB 

203B 

JP 

DUMP12 

C3 

DF 

AF 


; A=0? 


5 A~Ö? 


; A~-0? 


5 A= 0 ? 


91 


Ein Vergleich mit P15.1 stellt PIS.2 weit in den Schatten. P15.2 war 
aber auch nicht als Empfehlung gedacht, sondern lediglich als Darstel¬ 
lung einer Variante mit dem Ziel, auch aus dieser zu lernen. 
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Al5.2.3 Schreiben Sie ein Programm, das auf nahezu gleichem Wege 
von Dezimal nach Hexadezimal umwandelt und dabei die Fähigkeit der 
Z80-CPU zur Addition vierstelliger Hexadezimalzahlen nutzt. Verein¬ 
barung: Stellenwert in DE und Addition nach IY. 


15.3 Überlegungen zum Befehl DAA 

36 + 48 = 84 ; das ist eine Binsenweisheit. Wie aber kommt der 
Prozessor zu diesem Ergebnis, weil er doch hexadezimal addiert? Er 
berechnet also 36 + 48 = 7E, und dieses Hexadczimalergebnis wird 
durch DAA in 84d überführt. Man kann das offensichtlich durch 
Addition von 6 erzielen: 

36 + 48 = 7E 7E + 06 = 84 

36 + 48 = 7E 7E + 06 = 84 

36 + 49 = 7F 7F + 06 = 85 

Diese Sechseraddition muß stattfinden, wenn sich bei der Addition in 
einem Nibble eine Stellensumme > 9 ergibt. Im Fall FA + 06 = 100 
würde aber der Übertrag aus einer 8-bit-Addition im Carry stehen, und 
dieses benötigen wir für Vergleichsoperationen! Wir weichen daher wie 
folgt auf eine 16-bit-Addition aus: 

1. Wir setzen H gleich null und kopieren die dezimal zu adjustierende 
Hexadezimalzahl aus dem Akku nach L. 

2. Wenn das LSN von L > 9 ist, wird der Inhalt von HL um 0006 erhöht. 

3. Der gültige Wert von HL wird auf den Stapel gerettet. 

4. HL wird um 4 Binärstellen nach links geshiftet. 

5. Feststellung, ob H > 9. 

6. Gültigen Wert von HL wiederherstellen. 

7. Wenn «5», dann HL um 0060 erhöhen. 

8. Zur Ausgabe aus H und aus L. 

Für die beiden Vergleiche benutzen wir den Befehl CP n. Dazu müssen 
Sie noch wissen, daß nach der Subtraktion im Akku (vgl. Abschnitt 5.4) 
Carry gesetzt ist, wenn sich ein (negativer) Übertrag ergab: 

A = OB CP 0A OB - 0A = 01 CY = 0 

A = 0A CP 0A —> 0A - 0A = 00 CY = 0 

A = 09 CP 0A -> 09 - 0A = FF CY = 1 
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Aus diesen Überlegungen ergibt sich schließlich folgende DAA-Simula- 
tion: 

P15.3.1 


SUBDAA 

4100 

LD 

H , 00 

26 

00 


4102 

LD 

L, A 

6 F 



4103 

AND 

0 F 

E6 

0 F 


4105 

CP 

0 A 

FE 

OA 


4107 

JR 

ü,LAB1 

38 

04 


4109 

LD 

DE!, 0006 

11 

06 00 


41OC 

ADD 

HL., DE 

19 


LA EU 

41OD 

PUSH 

HL 

E5 



41 OE 

ADD 

HL, HL 

29 



41OF 

ADD 

HL, HL 

29 



41 10 

ADD 

HL, HL 




41 1 1 

ADD 

HL, HL 

29 



4112 

LD 

A, H 

7C 



4113 

CP 

OA 

FE 

OA 


4115 

PGP 

HL 

El 



4116 

RET 

C 

DB 



4117 

LD 

DE,0060 

11 

60 00 


41 1A 

ADD 

HL, DE 

19 



411B 

RET 


C9 



Diese Subroutine ist 28 Bytes lang, der Befehl DAA nur ein Byte, und er 
bewältigt das Entsprechende in einer Mikrosekunde (= eine millionstel 
Sekunde)! 

Und nun das Kurzprogramm zum Ausprobieren: 


P15.3.2 


4000 

CALL 

LETNL 

CD 

06 

00 

4003 

CALL 

INBYTE 

CD 

57 

AF 

4006 

PUSH 

AF 

F5 



40O7 

CALI- 

PRINTS 

CD 

0C 

00 

400A 

POP 

AF 

F1 



400B 

CALL 

SUBDAA 

CD 

00 

41 

40 OE 

LD 

A, H 

7C 



400F 

CALL 

GUTBYT 

CD 

30 

AF 

4012 

LD 

A, L 

7D 



4013 

CALL 

GUTBYT 

CD 

30 

AF 

4016 

JR 

TSTDAA 

18 

E8 



Probieren Sie TSTDAA mit vielen Beispielen aus und bedenken Sie 
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dabei, daß die Dezimalzahl xy den Wert x ★ 10 + y hat, auch wenn die 
Nibhles mit Hexadezimalziffern besetzt sind. So ist z. B. 

FBd = 15 * 10 + 11 = 161 d 

15.4 Warum es keinen Befehl HAA gibt 

Mathematisch gesehen läßt sich DAA als Funktion auffassen, denn 
jeder auszuwertenden Hexadezimalzahl wird völlig eindeutig genau 
eine Dezimalzahl zugeordnet. Man könnte daher auch schreiben 
DAA(FA) =160 usw. Der höchste Dezimalwert, der so zu erhalten ist, 
ist DAA(FF) = 165, d. h., der Wertevorrat umfaßt 166 Elemente, der 
Definitionsbereich hingegen 256. Deshalb müßte eine Umkehrung 
gegen das Prinzip der Eindeutigkeit verstoßen. 


15.5 Verbesserte Dez-Hex-Umwandlung 

Aus dem in Abschnitt 15.1 genannten Grund dürfen wir nicht bitweise 
Vorgehen, sondern müssen mit Nibbles operieren. Dabei hilft uns 
wieder das Hornersche Schema, dieses Mal in der Form 

6543 = ((6 * 10 + 5) * 10 + 4) * 10 + 3 

Die Hexadezimaladdition der einzelnen Dezimalziffern ist kein Pro¬ 
blem, und die hexadezimale Verzehnfachung ließe sich CPU-gerecht so 
gestalten: 

Zahl * lOd = (Zahl ★2*2 + Zahl) ★ 2 

Der Befehl ADD HL,HL ist zulässig, und ADD HL,DE kennen wir 
bereits. 

Nach dieser Skizze des Algorithmus geben wir gleich das Programm 
fertig fürs EBS an. Dieses Mal als (nicht ganz vollständiges) Assembler¬ 
protokoll: 
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P15.5. 1 








01 

0000 





LETNLs 

EQU 

0006 

02 

0000 





PRINTSs 

EQli 

000CH 

03 

0000 





GIJT4HX: 

EÖLJ 

AF25H 

04 

0000 





1 N6HEX: 

EQU 

AF46H 

05 

0000 





MSGNLs 

EQU 

AFEDH 

06 

0000 






REL 

AE34H 

07 

AE34 








08 

AE 34 

1 1 

7B 

AE 


DEZHEXs 

LD 

DE,TABLE 

09 

AE 37 

CD 

ED 

AF 



CALL 

MSGNL 

10 

AE3A 

21 

02 

12 


LABEL0S 

L.D 

HL,1202H 

11 

AE3D 

CD 

47 

AF 



CALL 

IN6HEX 

12 

AE 40 

CD 

0C 

00 



CALL 

PRINTS 

13 

AE43 

CD 

6 C 

AE 



CALL 

DHSWLK 

14 

AE46 

21 

00 

00 



L.D 

HL. , 0000 

15 

AE 4 9 

06 

05 




LD 

B, 05 

16 

AE4B 

CD 

65 

AE 


LABEL1s 

CALL 

HLZEHN 

17 

AE4E 

CD 

6 C 

AE 



CALL 

DHSWLK 

18 

AE 51 

5F 





LD 

E, A 

19 

AE52 

16 

00 




L.D 

D , 00 

20 

AE54 

19 





ADD 

HL, DE 

21 

AE55 

5 0 

F4 




DJNZ 

LABEL1 

22 

AE57 

22 

00 

12 



LD 

(1200H),HL 

23 

AE5A 

21 

01 

12 



L.D 

HL,1201H 

24 

AE5D 

CD 

25 

AF 



CALL 

0UT4HX 

25 

AE60 

CD 

06 

00 



CALL 

LETNL 

26 

AE63 

18 

D5 




JR 

LABEL0 

27 

AE65 

E5 




HLZEHN: 

PUSH 

HL 

28 

AE66 

29 





ADD 

HL., HL 

29 

AE67 

29 





ADD 

HL, HL 

30 

AE 6 8 

Dl 





POP 

DE 

31 

AE 6 9 

19 





ADD 

HL, DE 

32 

AE6A 

29 





ADD 

HL, HL 

33 

AE6B 

C9 





RET 


34 

AE6C 

E5 




DHSWLKs 

PUSH 

HL 

35 

AE6D 

AP 





XOR 

A 

36 

AE6E 

21 

00 

12 



LD 

HL,1200H 

37 

AE 71 

ED 

6 F 




RLD 


38 

AE 7 3 

23 





INC 

HL 

39 

AE 7 4 

ED 

6 F 




RLD 


40 

AE76 

r>y. 





INC 

HL 

41 

AE77 

ED 

6 F 




RLD 


42 

AE 7 9 

El 





PGP 

HL 

43 

AE7A 

C9 





RET 


44 

AE7B 

16 




TABLEs 

DEFB 

16H 

45 

AE7C 

55 

B3 

A3 

Al 


DEFM 

*Umwand1unq ? 

46 

AE80 

B0 

9C 

B8 

A5 
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47 AE84 BO 97 

48 AE86 20 44 45 5A DEFM ? DEZ -> HEX : ‘ 

49 AE8A 20 2D 3E 20 

50 AE8E 48 45 58 

51 AE91 OD DEFB ODH 

52 AE92 ; 

53 AE92 END 

Sie haben kein Lehrbuch der Assemblersprache vor sich; dennoch 
sollen Sie einige Einblicke gewinnen. Die folgenden Fragen sind nur als 
Verständnis- und Lesehilfe gedacht: 

A15.5.2 

a) Was bedeutet das z. B. in den Zeilen 02 bis 06 den Zahlen angehängte 
H? 

b) Weshalb durfte es z. B. in den Zeilen 01, 14, 15 weggelassen werden? 

c) Welcher Assemblerbefehl fügt ohne weitere Verarbeitung ein Byte in 
das Programm ein? 

d) Welcher Assemblerbefehl wandelt ausgeschriebene Wörter in 
ASCII-Strings um? 

P15.5.1 wurde nur für Hexadezimalzahlen bis FFFF ausgelegt! 
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16.1 Das Ermitteln der Prüfsumme 

Bei der Eingabe längerer Programme kann man sich leicht vertun, aber 
man findet den Fehler nicht so leicht wie bei einem BASIC-Programm, 
denn der Objektcode (das aus Hexadezimalzahlen bestehende Maschi¬ 
nenprogramm) ist nicht so leicht zu überprüfen wie ein sinnerfüllter 
BASIC-Quelltext. Man gibt deshalb für längere Programme manchmal 
Prüfsummen an. Eine Prüfsumme ist die Summe aller Hexadezimalzah¬ 
len, die ein Maschinenprogramm bilden. Ein absoluter Schutz ist das 
nicht, denn wir könnten ja einmal um eins zuviel und einmal um eins 
zuwenig eingetippt haben. Doch die Wahrscheinlichkeit dafür, daß 
sich zwei Fehler gegenseitig aufheben, ist recht gering. Die größte 
Prüf summe, die wir in unserem MZ-700 erreichen könnten, läge vor, 
wenn alle 10000h Bytes mit dem Höchstwert FFh belegt wären. 
10000h ★ FF=FF0000. Wir kommen also in jedem Fall aus, wenn wir die 
Prüfsumme in drei Bytes berechnen. 

Wir statten auch dieses Programm mit einigem Komfort aus, greifen 
aber bis auf weiteres auf die gewohnte Darstcllungsweise zurück. 

Speicherdisposition: 

1200 ( + 1): Hierin wird mittels IN4HEX die VON-Adresse geladen, von 
der an die Prüfsumme gebildet werden soll. Mit jedem aufaddierten 
Byte wird der Inhalt dieser Speicherstelle(n) um eins erhöht. 

1202 ( + 1): Hier steht die BIS-Adresse. 

1204... 1206: Hier wird die Prüfsumme gebildet. 

Zuerst stellen wir die Dialogtexte bereit: 

PIA- 1. 1 

TABPRS 2800 20 50 9D AD AA A4 A5 B3 B3 92 20 0D 

TABVON 280C AB B7 B0 20 0D 

TABBIS 2811 20 9A AA A4 20 0D 
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Dann organisieren wir den Eingabedialog und die Eingaben und setzen 
die Prüfsumme auf null: 


P16. 1-2 


PREINL 2100 

CALL 

LETNL 

CD 

06 

00 

2103 

LD 

DE,TABV0N 

1 1 

OC 

28 

2106 

CALL 

MSB 

CD 

15 

00 

2109 

LD 

HL,1201 

21 

01 

12 

21 OC 

CALL 

IN4HEX 

CD 

4C 

AF 

210F 

LD 

DE,TABBIS 

11 

1 1 

28 

2112 

CALL 

MSG 

CD 

15 

00 

2115 

LD 

HL,1203 

21 

03 

12 

2118 

CALL 

IN4HEX 

CD 

4C 

AF 

21 1B 

XOR 

A 

AF 



21 IC 

LD 

(1204),A 

32 

04 

12 

21 1F 

LD 

(1205),A 

32 

05 

12 

2122 

LD 

(1206),A 

32 

06 

12 

2125 

RET 


C9 




Der üppige Befehlsreichtum der Z80-CPU läßt für viele (Teil-)Probleme 
mehrere Lösungen zu. Wenn man in ein EPROM möglichst viel Pro¬ 
gramm hineinbrennen will, wird man die kürzeste Lösung suchen - bei 
zeitkritischen Problemen die schnellste. Wir legen mehr Wert auf 
Lesbarkeit und zeilenmäßig kürzere Versionen. 

Wir addieren nun den Inhalt der jeweils adressierten Speicherstelle 
ohne Carry zu (1204). Die Überträge nach 1205 und 1206 werden durch 
Addieren von null mit Carry erzielt: 


P16.1.3 


ADDIRN 2140 
2143 

LD 

ADD 

A, (1204) 
A, (HL) 

3A 

86 

04 

12 

2144 

LD 

(1204),A 

32 

04 

12 

2147 

LD 

A, (1205) 

3A 

05 

12 

214A 

ADC 

A, OO 

CE 

00 


214C 

LD 

(1205),A 

32 

05 

12 

214F 

LD 

A,(1206) 

3A 

06 

12 

2152 

ADC 

A, 00 

CE 

00 


2154 

2157 

LD 

RET 

(1206),A 

32 

C9 

06 

12 

Das Hauptprogramm gibt zunächst den Namen der Utility 

aus und ruft 

dann PREINL und ADDIRN 

auf. HL wird 

danach 

auf 

die nächste 


Speicherstelle gerichtet. Nun wird festgestellt, ob deren Inhalt auch 
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noch zu addieren ist oder ob die BIS-Adresse überschritten wurde. 
Selbstverständlich wird man das normalerweise mit einer 16-bit-Sub- 
traktion ermitteln. Hier soll jedoch beiläufig gezeigt werden, welche 
Schritte ohne diese zu vollziehen wären: Wurde H größer als der Inhalt 
von 1203, ist nach 2016 Carry gesetzt, und die Additionsschleife wird 
verlassen. Im Fall H = (1203) (nur der kommt als Alternative in Frage) 
ist L mit (1202) zu vergleichen. Wenn L ) (1202), dann ist nach 20IE 
Carry gesetzt, und es geht zur Ausgabe. 


FT 6. 1.4 
F’RUESU 2006 

CALL CLS 

CD 

9F 

AF 

2003 

LD DE,TABPRS 

1 1 

00 

28 

2006 

CALL MSGNL 

CD 

ED 

AF 

LPRUS0 2009 

CALL PREINL 

CD 

00 

21 

200C 

LD HL,(1200) 

2A 

00 

12 

LPRUS1 200F 

CALL ADDIRN 

CD 

40 

21 

2012 

INC HL 

O T 



2013 

L..D A, (1203) 

3A 

03 

12 

2016 

CP H 

BC 



2017 

JR C,LPRUS2 

38 

08 


2019 

JR NZ, LF'RUSl 

20 

F4 


201 B 

LD A,(1202) 

3A 

02 

12 

20 IE 

CP L 

BD 



201 F 

JR NC,LPRUS1 

30 

EE 


LPRLJS2 2021 

LD DE, TABF'RS 

1 1 

00 

28 

2024 

CALL MSG 

CD 

15 

00 

2027 

LD HL,1206 

21 

06 

12 

202 A 

CALL 0UT6HX 

CD 

20 

AF 

202 D 

JR LPRUS0 

13 

DA 



Al6.1.5 Testen Sie das Programm gewissenhaft aus. Ermitteln Sie z. B. 
die Prüfsummen von ... bis 

a) 0000 ... 0000 (kein Irrtum!), 

b) 0000...0100 und 0000...0101. 

c) Berechnen Sie aus bl) und b2) den Inhalt von 0101. 

d) 0000 ... 0800, 0800... 0FFF, 0000... 0FFF (Monitor). 

e) Berechnen Sie aus den Ergebnissen von d) den Inhalt von 0800. 
Prüfen Sie mit Dxxxx oder Mxxxx nach. 

f) Fügen Sie dieses nützliche Programm ins EBS ein. 
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16.2 Blocktransfer 

Sie haben eben manuell vier Programmblöcke im Speicher verschoben 
und mit dem EBS zusammengefügt. Die dabei im Innern dieser Blöcke 
zu verändernden Adressen haben wir von Hand korrigiert und werden 
das auch weiterhin tun. Das bloße Verschieben soll jetzt jedoch durch 
ein etwas aufwendigeres Programm erledigt werden. 

A16.2.1 Entwerfen Sie unter ausschließlicher Verwendung der bisher 
benutzten Befehle Programme, die folgendes leisten: 

a) DUMP12 (AFDF... AFEC) soll nach 1200 ... kopiert werden. Emp¬ 
fehlung: Rufen Sie vorher NULL 12 mit JAFF4. 

b) Der Block 1200... 1204 soll nach 1203 ... 1207 verschoben werden. 
Anfangszustand: 1200 AA BB CC DD EE 11 11 11. 

c) Der Block 1203... 1207 soll nach 1200... 1204 verschoben werden. 
Anfangszustand: 1200 11 11 11 AA BB CC DD EE. 

Arbeiten Ihre Programme, insbesondere zu 1. und 2. wirklich einwand¬ 
frei? Sind alle Einsen verschwunden? 

Beim Blocktransfer sind drei Fälle zu unterscheiden: 



Fall 1 

Fall 2 


Fall 3 


AAA0 

! ANFalt! 

!ANFneu ! 

i 

ANFalt 

i 

BBBO 

I + -+ •+ 

!!ANFneu!! 

++-+ ! 

!!ANFalt!! 

i 

i 

ENDalt 

i 

i 


i < ii 

ii ii 

+- 

— 

- 4 * 


ii ii 

ii ii 

•+*- 

— 

- + 

CCCO 

!!ENDalt!! 

!!ENDneu!! 

i 

ANFneu 

1 

DDDO 

•+•+-+ ! 

!ENDneu ! 

i + -+•+• 

! ENDalt! 

i 

i 

ENDneu 

l 

1 


-+•--+ 

+-h 

+- 


-+ 


Bild 16.1 Die drei Fälle beim Blocktransfer 


Das Verschieben von Speicherblöcken kommt in der Praxis des Pro¬ 
grammierer in Maschinensprache nicht gerade selten vor: Manchmal 
will man eine fertige Routine in ein aufzubauendes Programm überneh¬ 
men, manchmal will man ein unveränderliches Programm aus dem 
ROM ins RAM schieben (vgl. Abschnitt 24.5), um es dort zu verändern. 
Der Z80 stellt hierfür zwei besonders komfortable Befehle bereit: 
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LDIR überträgt zuerst das erste Byte eines Blocks, dann das zweite, das 
dritte usw. 

LDDR überträgt zuerst das letzte, das vorletzte usw. 

Dazu muß 

die jeweils erste Her-Adresse in HL, 
die jeweils erste Hin-Adresse in DE und 
die Anzahl der zu kopierenden Bytes in BC 

eingeschrieben sein. Man kann so bis zu 64 KB mit einem Vierzeiler 
transferieren! 

Wir lösen jetzt A16.2.1b auf diesem Wege: 


P16.2 

.2 




4A00 

LD HL,1204 

.21 

04 

12 

4A03 

L.D DE, 1207 

1 1 

07 

12 

4A06 

LD BC,0005 

01 

05 

00 

4A09 

LDDR 

ED 

B8 


4A0B 

JP DUMP12 

C3 

DF 

AF 


A16.2.3 Lösen Sie A16.2.1c) entsprechend! 

Wie schon angedeutet, bewirken die Blocktransferbefehle lediglich die 
bloße Verschiebung. Enthält der verschobene Block auch noch absolute 
Adressen - z. B. bei JP, CALL, LD HL,nn usw. -, so ist zu prüfen, ob 
diese auch verändert werden müssen. Wir tun das von Hand. Es gibt 
aber auch Relokatierprogramme, die das bewerkstelligen. Sie sind zu 
kompliziert, als daß wir sie in diesem Buch besprechen könnten. 


16.3 Ein Blick in den «richtigen» Stapel 
(Systemstapel) 

In Kapitel 10 haben wir uns schon mit dem Stapel beschäftigt. Ein Blick 
in den vom Monitor benutzten ‘«richtigen» Stapel war bisher kaum 
möglich, da er ja nur mit Hilfe des Monitors möglich wäre, und der 
würde ihn ja beim bisherigen Vorgehen neu einrichten. Jetzt kopieren 
wir den Stapel vorher in einen Bereich, der nach RST 00 nicht über¬ 
schrieben wird. P16.3.1 dient nur dazu, einen überschaubaren Zustand 
des Stapels herbeizuführen und dann alles weitere zu stoppen. 
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P16-3-1 (Pr ü-f summe s OCBA) 


3000 

CALL 3008 


CD 

08 

30 



3003 

NOP NOP NOP NOP 

NOP 

00 

00 

00 

00 

00 

3O08 

CALL 3010 


CD 

10 

30 



300B 

NOP NOP NOP NOP 

NOP 

00 

00 

00 

00 

00 

3010 

CALL 3018 


CD 

18 

30 



301 3 

NOP NOP NOP NOP 

NOP 

00 

00 

00 

00 

00 

3018 

CALL 3020 


CD 

20 

30 



301B 

NOP NOP NOP NOP 

NOP 

00 

00 

00 

00 

00 

3020 

LD DE,1234 


11 

34 

12 



3023 

PUSH DE 


D5 





3024 

LD DE,5678 


11 

78 

56 



3027 

PUSH DE 


D5 





3028 

LD DE,9ABC 


11 

BC 

9A 



302B 

PUSH DE 


D5 





302C 

LD HL,1000 


21 

00 

10 



302F 

LD DE,1200 


11 

00 

12 



3032 

LD BC,OOFO 


01 

FO 

00 



3035 

LDIR 


ED 

BO 




3037 

HALT 


76 






A16.3.2 Bevor Sie das Programm eingeben und laufen lassen, überlegen 
Sie doch bitte folgende Fragen: 

a) Von wo bis wo reicht der Stack? 

b) In welchen Bereich wird der Stapel kopiert? 

c) Wo erwarten Sie den ersten Eintrag? Sehen Sie bitte vor Beantwor¬ 
tung dieser Frage genau ins Z80-Handbuch! 

d) Können Sie vielleicht den Inhalt der Stack-Kopie Voraussagen? 


16.4 Zufallszahlen aus eigenen Algorithmen 

Zufallszahlen spielen in der Computerei eine nicht zu unterschätzende 
Rolle. Sie werden für vielfältige statistische Zwecke (Stichproben, aber 
auch Ermitteln der Kreiszahl Pi nach dem Monte-Carlo-Verfahren, 
Optimierungsprobleme usw.) benötigt; aber auch für Spiele, bei denen 
es auf Überraschungseffekte ankommt. 

Nun ist ein Computer aber eine voll determinierte Maschine, in der 
es keinen Zufall gibt. Man kann mit ihm aber sehr wohl Pseudozufalls¬ 
zahlen (falsche oder besser: nicht echte) erzeugen. Alles, was wir 
benötigen, ist ein Anfangswert und eine Rechenvorschrift, nach der aus 
dem momentanen Wert der folgende berechnet wird. 
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Eine derartige Rechenvorschrift könnte im allereinfachsten Falle so 
aussehen: Der neue Zufallswert (Randomzahl) wird aus der alten durch 
Verdoppeln erzeugt. Verdoppeln einer Hexadezimalzahl und Linksshif- 
ten sind, wie wir wissen, weithin identisch. Wenn wir von einer 2-Byte- 
Zahl ausgehen, können wir leicht Vorhersagen, daß sic nach höchstens 
16maligem Verdoppeln bei Mißachtung des Übertrags zu null wird. 
Damit das nicht geschieht, addieren wir mit Carry. 

Bei der Realisierung verwenden wir einen neuen Befehl, und um den 
zu verstehen, müssen wir noch einen Blick auf die Architektur des Z80 
werfen: 


■+•- a -•++•-+-+ 

! A ! F ! ! A" ! F ? ! 

4--+-4-4---4-4 

! B ! C ! ! B" ! C" ! 

•4-+-+ 4--4--4- 

! D ! E ! ! D’ ! E" ! 

H—«-.j.-- _j_ _j--j— — —• 4' 

! H ! L ! ! H ’ ! L ! 

4--4-+ 4--*-+ 

! IX ! 

! IY ! 

4--4 

.4-4 

! PC ! 


! SP ! 

Bild 16.2 Die Register des Z80(A) 


Bild 16.2 zeigt, daß vier Registerpaare des Z80 doppelt vorhanden sind; 
man kann die nebeneinanderstehenden Paare gegeneinander vertau¬ 
schen, z. B. durch den Befehl EX AF,AF\ Wir wenden diesen Austausch 
(exchange) im folgenden Programm an, um (zusammen mit den beiden 
A-Registern (Akkus)) in F (bzw. ¥') den bei der Addition erhaltenen 
Carry-Zustand für die nächste Addition aufzubewahren. Damit erhält 
unser Programm folgende Gestalt: 
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F'16.4. 

.1 (Prüf summe: 1087) 




RANDOM 

2000 

CALL 

INBYTE 

CD 

57 

AF 


2003 

LD 

H, A 

67 




2004 

CALL 

INBYTE 

CD 

57 

AF 


2007 

LD 

Lj, A 

6F 



LABEL 

2008 

CALL 

LETNL 

CD 

06 

00 


200B 

L.D 

Ay H 

7C 




2O0C 

CALL 

OUTBYT 

CD 

30 

AF 


200F 

L.D 

A., L 

7D 




2010 

CALL 

OUTBYT 

CD 

30 

AF 


2013 

EX 

AF j, AF ’ 

08 




2014 

ADC 

HL, HL_ 

ED 

6A 



2016 

EX 

AF,AF ? 

08 




2017 

CALL 

F'AUSWK 

CD 

D4 

AF 


201A 

CALL 

SBMONI 

CD 

B3 

AF 


20 ID 

JR 

LABEL 

18 

E9 



Nach dem Programmstart mit J2000 wird der vierstellige Anfangswert 
eingegeben. Nach jedem Durchlauf muß eine Taste gedrückt werden, 
um die nächste Zufallszahl zu erhalten. Drückt man SHIFT und BREAK 
gleichzeitig, so bringt uns SBMONI in den Monitor zurück. 

Je nach zufälligem Carry-Anfangszustand erhalten wir mit den 
Anfangswerten 0001, 0002, 0500, 3412 zyklische Folgen mit der Perio¬ 
denlänge 17. Muß das immer so sein? (Wir haben de facto ein 17-Bit- 
Schieberegister aufgebaut!) 

A16.4.2 Versuchen Sie, ob man beim Verdreifachen (z. B. mittels DE) 
längere Perioden erhält! 

Weil wir schon bald einen eleganteren Weg zum Erzeugen von Zufalls¬ 
zahlen kennenlemen werden, brauchen wir diese simplen Erstansätze 
nicht weiter zu verfolgen. 


16.5 Die eingebaute Uhr 

Der MZ-700 ist mit einem Zeitgeberbaustein 8253 ausgestattet, dessen 
Signale u. a. als Uhr von hoher Ganggenauigkeit aufgefaßt werden 
können. Sie wird mit Hilfe der Monitorroutine TIMST (0033) gestellt 
und gestartet und mittels TIMRD (003B) gelesen (vgl. Sharp-Handbuch 
Seite 153). Ein Tag hat 24 * 60 * 60 = 86 400 Sekunden. 
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Zur Darstellung dieses Betrages als Hexadezimalzahl benötigt man 
fünf Stellen: 86400d = 15180h, deren erste nur 0 oder 1 sein kann. Im 
MZ-700 zeigt der Akku an, oh es sich um eine Vormittagszeit (A = 0) 
oder um eine Nachmittagszeit (A = 1) handelt. Die übrigen 4 Hexadezi- 
malstellcn nimmt das DE-Register auf. 

Angenommen, wir wollen um 19h 23min 45s die Uhr stellen. Dann 
wäre «Nachmittag» als A = 1 zu codieren und übrig bliebe 7h 23min 
45s. 

Wegen 7 * 60 ★ 60 + 23 ★ 60 + 45 = 26625d = 6801h ist DE mit 6801 
zu laden. Danach muß TIMST aufgerufen werden. Das Stellen einer 
Uhr hat keinen Sinn, wenn man sie nicht wieder ablesen kann. Wir 
leiten daher das Programm in eine endlose Schleife, in der ständig durch 
TIMRD (003B) ausgelesen und mittels OUTBYT angezeigt wird. Die 
Schleife kann durch SBMONI unterbrochen werden. 


p16.5.1 (Pr üfsummes 0CBE) 


UHROUT 


LOOP 


2000 

L.D 

A, 01 

3E 

01 


2002 

LD 

DE,6801 

11 

01 

68 

2O05 

CALL 

TI MST 

CD 

7.3 

00 

2008 

CALL 

LETNL 

CD 

06 

00 

200B 

CALL 

TIMRD 

CD 

3B 

00 

200E 

CALL 

OUTBYT 

CD 

30 

AF 

201 1 

LD 

A, D 

7A 



201.2 

CALL 

OUTBYT 

CD 

30 

AF 

2015 

LD 

A, E 

7B 



2016 

CALL- 

OUTBYT 

CD 

30 

AF 

2019 

CALL. 

SBMONI 

CD 

B3 

AF 

201G 

JE 

LOOP 

18 

EA 



Das Programm läuft ziemlich rasch ab; je Sekunde werden auf dem 
Bildschirm etwa 20 Zeilen ausgegeben, d. h., die Schleife (2008 ... 201D) 
wird in etwa 50000 ßs durchlaufen. Wenn man bedenkt, daß bei einer 
Taktfrequenz von 3,5 MHz in sehr grober Annäherung je Mikrosekunde 
rund ein Byte des Maschinenprogramms abgearbeitet wird, so erscheint 
der Programmdurchlauf langsam. Man muß jedoch dabei bedenken, daß 
sich hinter fast allen aufgerufenen Routinen längere Programmteile 
verbergen, die z. T. mehrmals durchlaufen werden. 

Unser erstes, noch recht primitives Uhrprogramm läuft korrekt. 
Leider aber kann man mit dieser Form der Zeitansage wenig anfangen. 
Versuchen wir also, die Anzeige lesbarer zu gestalten! 
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Formatierte Zeitanzeige 

Um aus der hexadezimal angezeigten Anzahl der Sekunden auf Stunden 
umzurechnen, müssen wir durch 3600 dividieren. Höchste Zeit also, 
die vierte Grundrechenart nachzutragen. In Maschinenprogrammen 
dividiert man im allgemeinen, indem man den Teiler (Divisor) von der 
zu teilenden Zahl (Dividend) so oft subtrahiert, bis ein negativer Über¬ 
trag (CY = 1) erfolgt, also einmal zu oft. Dann wird einmal zurückad¬ 
diert und bei alldem natürlich die Anzahl der Subtraktionen mitge¬ 
zählt, denn sie ergibt ja den gesuchten Quotienten, den wir in diesem 
Fall als Dezimalzahl benötigen. 

Wir entwerfen die Division gleich passend für das Uhrzeitproblem. 
Am Schluß soll in 1200 die Anzahl der Stunden stehen, in 1201 die 
Anzahl der Minuten und in 1202 die der Sekunden. Damit ergibt sich 
folgender Aufbau: 

1. 1200... 1202 auf null setzen. 

2. Uhrzeit lesen. 

3. Wenn A = 1, dann (1200) = 12 für Nachmittag. 

4. DE nach HL wegen SBC HL,DE. 

5a DE = 0E10 = Anzahl Sekunden in einer Stunde. 

6a HL = HL - DE und (1200) inkrementieren. 

7a Solange CY = 0 zurück nach 6a. 

8a HL = HL + DE und (1200) dekrementieren. 

5b DE = 003C = Anzahl Sekunden in einer Minute. 

6b HL = HL - DE und (1201) inkrementieren. 

7b Solange CY = 0 zurück nach 6b. 

8b HL = HL + DE und (1201) dekrementieren. 

5c DE = 0001. Division durch 1 wegen DAA! 

6c HL = HL - DE und (1202) inkrementieren. 

7c Solange CY = 0 zurück nach 6c. 

8c HL = HL + DE und (1202) dekrementieren. 

9. Neue Zeile und Cursor einmal nach oben. 

10. Zeit ausgeben. 

11. Zurück nach 1. 
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P16.5.2 ( Pr üfsumme: 27 B7) 


UHR AN 7 . 

2000 

L.D 

A, Ol 

3E 

01 




2002 

LD 

DE,6801 

11 

01 

68 



2005 

CALL 

TIMST 

CD 

33 

00 



2008 

CALL 

CL..S 

CD 

9F 

AF 


NEU 

200 B 

CALL 

NULL 12 

CD 

F4 

AF 

5 1 ■ 


20 OE 

CALL 

TIMRD 

CD 

3B 

00 

52. 


2011 

AND 

A 

A7 



;Z-FIag? 


2012 

JR 

Z, L1 

28 

05 




2014 

LD 

A p 12 

3E 

12 


« 3 , 


2016 

LD 

(1200),A 

32 

00 

12 


LI 

2019 

LD 

H, D 

62 



54. 


201A 

LD 

L,E 

6B 





201B 

LD 

IX,1200 

DD 

21 

00 

12 5 Pointer 


201F 

LD 

DE,OE10 

1 1 

10 

OE 

; 5a 


2022 

CALL 

DIV 

CD 

47 

20 



2025 

LD 

DE,003C 

1 1 

3C 

00 

; 5 b 


2028 

CALL 

DIV 

CD 

47 

20 



202B 

LD 

DE,0001 

11 

01 

00 

5 5c 


202E 

CALL 

DIV 

CD 

47 

20 



2031 

CALL 

LETNL. 

CD 

06 

00 

5 9. 


2034 

LD 

A, 12 

3E 

12 




2036 

CALL 

PR NT 

CD 

12 

00 



2039 

L..D 

HL,1200 

21 

00 

12 

5 10. 


203C 

CALL 

AUSGEB 

CD 

64 

20 



203F 

CALL 

AUSGEB 

CD 

64 

20 



2042 

CALL 

AUSGEB 

CD 

64 

20 



2045 

JR 

NEU 

18 

C4 


»11- 

DI V 

2047 

LD 

A,(IX+OO) 

DD 

7E 

00 

; 6abc 


204A 

ADD 

A, 01 

C6 

01 




204C 

DAA 


27 





204D 

LD 

(IX+OO),A 

DD 

77 

00 



2050 

AND 

A 

A7 



;CY:~0 


2051 

SBC 

HL, DE 

ED 

52 




2053 

JR 

NC,DIV 

30 

F2 


; 7abc 


2055 

LD 

A,(IX+OO) 

DD 

7E 

00 

5 8abc 


2058 

SUB 

01 

D6 

01 




205A 

DAA 


27 





205B 

LD 

(IX+OO),A 

DD 

77 

00 



2 OSE 

AND 

A 

A7 



;CY:=0 


205F 

ADC 

HL, DE 

ED 

5A 




2061 

INC 

IX 

DD 

23 




2063 

RET 


C9 




AUSGEB 

2064 

LD 

A, (HL) 

7E 





2065 

CALL 

OUTBYT 

CD 

30 

AF 



2068 

CALL 

PRINTS 

CD 

OC 

00 



206B 

INC 

HL 

0*7 





206C 

RET 


C9 
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Das Programm läuft einwandfrei. Einziger Schwachpunkt ist das 
unschöne Stellen der Uhr. Es sein dem Leser überlassen, hier für mehr 
Komfort zu sorgen. 


16.6 Zufallszahlen aus dem Intervall-Timer 

Die Uhr wird mit Befehl CALL 003B gelesen. Im Monitorlisting finden 
wir folgende Eintragung: 

50 003B C35803 JP ?TMRD ; TIME READ 

Wir haben schon des öfteren Programme nach Assemblerart mit Kom¬ 
mentaren versehen; sie werden vom eigentlichen Programm durch 
Semikolon abgetrennt, vergleichbar mit den REMs in BASIC-Program- 
men. Wir haben auch schon symbolische Adressen benutzt, die bei 
Benutzung eines Assemblers (Hilfsprogramm für die Übersetzung aus 
der Assemblersprache in die echte Maschinensprache) einen sehr hohen 
Programmierkomfort ermöglichen. Der Assembler rechnet mit diesen 
Labels wie mit Variablen, auch wenn ihr endgültiger Wert noch nicht 
feststeht. Das in 50 003B benutzte Label «?TMRD» finden wir im 
Sharp-Handbuch auf Seite 201 unter Page 64 in der 13. Zeile als zweiten 
Eintrag und daneben die zugehörige Adresse 0358. Wir hätten jedoch gar 
nicht so weit zu blättern brauchen, denn die oben zitierte Zeile besagt 
in unserer gewohnten Form lediglich 

003B JP 0358 C3 58 03 

Bitte vergleichen Sie genau! Dort steht also ein uns gut bekannter 
Sprungbefehl, und wir suchen bei 0358 weiter. 

Auf Seite 175 finden wir unter Page 12 in Zeile 15 die als Kommentar 
hervorgehobene Überschrift «TIME READ». In Zeile 22 beginnt der 
eigentliche Programmabschnitt. Wir stoßen danach mit etwas Spürsinn 
auf die Zeile 36: 


036D JR C,037F 38 10 

In diesem Bereich stehen die Befehle DI und EI, zu denen Sie im Anhang 
A einen kurzen Hinweis finden. 
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In Verbindung mit Zeile 37 sind dann die Zeilen 47 und 48 besonders 
aufschlußreich: 


0380 LD HL,E006 21 06 E0 

0333 LD A,(HL) 7E 

Hat die Speicherstelle E006 etwas mit der Uhr zu tun? Auf Seite 130 des 
Sharp-Handbuchs werden die Speicherstcllen E004.. .E007 dem «Zeit¬ 
geber 8253» zugeordnet. Ohne auf seine Funktion näher einzugehen, 
versuchen wir einen Einblick in seine Register. 

Wir verfassen nun ein Programm, das die zugehörigen Speicherstellen 
ausliest und ihren Inhalt auf dem Bildschirm anzeigt. Damit wir folgen 
können, bauen wir eine Verzögerung ein. Wir sollten nicht vergessen, 
die Uhr vorsichtshalber neu zu starten! 


PI6.6.1 (Prüfsumme: 13E4) 


RD82* 


L OOP 


3000 

LD 

A, 01 

3002 

LD 

DE„6801 

3005 

CALL 

TIMST 

3008 

LD 

A, <E004> 

300B 

CALL 

OUTBYT 

300E 

CALL 

PRINTS 

301 1 

LD 

A 5 (E005) 

3014 

CALL 

OÜTBYT 

3017 

CALL 

PRINTS 

301A 

LD 

A,(E006) 

30 ID 

CALL 

OIJTBYT 

3020 

CALL 

PRINTS 

3023 

LD 

A,(E007) 

3026 

CALL 

OUTBYT 

3029 

LD 

A, 40 

302B 

CALL 

WARTEN 

302E 

CALL 

LETNL 

3031 

JR 

LOOP 


3E Ol ;Uhr stellen 

11 01 68 
CD 33 00 
3A 04 E0 
CD 30 AF 
CD 0C 00 
3A 05 E0 
CD 30 AF 
CD 0C 00 
3A 06 E0 
CD 30 AF 
CD 0C 00 
3A 07 E0 
CD 30 AF 

3E 40 ;variieren 

CD B8 AF 
CD 06 00 
18 D5 


Wir sehen auf dem Bildschirm in schneller Folge Zahlenkolonnen nach 
oben wandern. Einige Kolonnen scheinen lediglich sich abwechselnde 
Werte zu zeigen; doch in der zweiten Kolonne treten Zahlen auf, die 
keine auffallende Gesetzmäßigkeit erkennen lassen. Für viele Anwen¬ 
dungen werden wir also wohl die Inhalte von E005 als Zufallszahlen 
lesen können. Vorsichtshalber sehen wir uns E005 vorher noch einmal 
genauer an: 
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P16.6.: 

RDE0O5 


LOOP 


3100 

LD 

A, 01 

3E 

01 


3102 

LD 

DE,6801 

11 

01 

68 

3105 

CALL 

TIMST 

CD 

33 

00 

3108 

LD 

B, A0 

06 

A0 


310A 

LD 

IX ,1200 

DD 

21 

00 12 

310E 

LD 

A,(E005) 

3A 

05 

E 0 

3111 

LD 

(IX+00),A 

DD 

77 

00 

3114 

INC 

IX 

DD 

23 


3116 

DJNZ 

LOOP 

10 

F 6 


3118 

JP 

DUMP12 

C3 

DF 

AF 


5 Uhr st. 


;160mal 


Unsere Vorsicht hat sich gelohnt. Wenn wir E005 in dieser Weise 
auslesen, erhalten wir etwa folgendes Bild: 

1200 FB 3C FB 3C FA 3C FA 3C 
1208 F9 3C F9 3C F8 3C F8 3C 
1210 F8 3C F7 3C F7 3C F6 3C 

Daß sich die Glieder der fallenden Folge FB, FA, F9, F8, ... wiederholen, 
braucht uns nicht zu beunruhigen, denn unser schnelles Programm ließ 
dem Intervallgenerator ja gar keine Zeit, rechtzeitig weiterzuticken. 
Höchst bedenklich ist dagegen die penetrante alternierende Wiederho¬ 
lung des Wertes 3C. Probieren geht nach einem Sprichwort über Studie¬ 
ren. Wandeln wir doch PI6.6.2 ein wenig ab: 


F'l 6 . 6 - 

3 







3100 

m m m m 


. • 

. • 

. . 

LOOP 

3108 

LD 

A,(E005) 

3A 

05 

E0 


310B 

CALL 

OUTBVT 

CD 

30 

AF 


310E 

CALL 

PRINTS 

CD 

0C 

00 


3111 

CALL 

PRINTS 

CD 

0C 

00 


3114 

L.D 

A, 20 

3E 

20 



3116 

CALL 

WARTEN 

CD 

B 8 

AF 


3119 

JR 

LOOP 

18 

ED 



Bei diesem gemächlichen Tempo ist die störende Erscheinung ver¬ 
schwunden. Dieses Pseudo-Random-Verfahren erscheint brauchbar. 
Man sollte es aber nicht ohne weitere Überprüfung (vgl. P16.7.1) für 
kritische statistische Probleme benutzen. 
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Al6.6.4 Der Computer knobelt 

Schreiben Sie ein Programm, das einen Würfel simuliert! Der jeweils 
nächste Wurf soll auf Tastendruck ausgegeben werden. Der Ablauf ist 
so zu verzögern, daß jedesmal nur eine Ausgabe erfolgt. 


16.7 Von der Güte unseres Random-Generators 


Vielleicht werden auch in Ihrer Lösung nach einiger Zeit die Zweien 
knapp. Dies ist Grund genug, die Güte unseres Random-Generators zu 
prüfen, indem wir z. B. jede 1 in 1201, jede 2 in 1202, ... jede 6 in 1206 
durch Inkrementieren zählen. Der jeweilige Zählerstand soll wie bei der 
Uhrzeit angezeigt werden. Unser Programm weist eine Besonderheit 
auf: Es verändert sich selbst; das Offset zu IX wird je nach geworfener 
Augenzahl nach 412C eingespeichert. Nach je hundert Würfen soll der 
Ablauf unterbrochen und erst auf Tastendruck wieder freigegeben wer¬ 
den. Dadurch soll unkontrolliertes Überzählen verhindert werden. 


P16.7. 

1 (Pr 

üfsummes 1C84 

(bei ;• 

x ~ 

00 ) ) 

BUERND 

4100 

LD 

A, 01 

3E 

01 



4102 

LD 

DE,6801 

11 

01 

68 


4105 

CALL 

TI MST 

CD 

33 

00 


4108 

CALL 

NULL 12 

CD 

F4 

AF 


410B 

CALL 

CLS 

CD 

9F 

AF 

LOOP 1 

410E 

LD 

B, 64 

06 

64 


LOOP 2 

4110 

LD 

IX ,1200 

DD 

21 

00 12 


4114 

LD 

A,(E005) 

3A 

05 

E 0 


4117 

LD 

H, 00 

26 

00 



4119 

LD 

L, A 

6 P" 




41 1A 

LD 

DE,0006 

1 1 

06 

00 


41 ID 

AND 

A 

A7 



LI 

41 IE 

BBC 

HL, DE 

ED 

52 



4120 

JR 

NC, L1 

30 

FC 



4122 

CCF 


3F 




4123 

ADC 

HL, DE 

ED 

5A 



4125 

LD 

A, L 

7D 




4126 

INC 

A 

3C 




4127 

LD 

(L2+02), 

A 32 

2C 

41 

L 2 

412A 

INC 

(IX+mm) 

DD 

34 

X X 


412D 

LD 

HL,1201 

21 

01 

12 


4130 

PUSH 

BC 

C5 




4131 

LD 

B, 06 

06 

06 
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L0GP3 4133 

LD 

Aj, (HL) 

4134 

CALL 

OUTBYT 

4137 

CALL 

PRINTS 

413A 

INC 

HL 

413B 

DJNZ 

LOOP 3 

413D 

PÜP 

BC 

413E 

CALL 

LETNL 

4141 

LD 

A, 12 

4143 

CALL 

PRNT 

4146 

DJNZ 

L00P2 

4148 

CALL 

PAUSKY 

414B 

JR 

LOOP 1 


7E 

CD 30 AF 
CD 0C 00 
23 

10 F6 
CI 

CD 06 00 

3E 12 ;Cursor hoch 

CD 12 00 
10 CS 
CD D9 AF 
18 CI 


A16.7.2 Fragen: 

a) Was bedeutet L2? 

b) Was bedeutet L2+02? 

c) Was geben Sie an Stelle von xx ein? 

d) Weshalb wird in 4130 das BC-Register gepushet? 

e) Von wo bis wo reicht der Programmteil, der die Ausgabe erledigt? 

f) Nach dem Starten des Programms vergehen etwa 2,5 s bis zu seinem 
ersten Zwischenhalt. Wie viele Zufallszahlen werden in dieser Zeit 
berechnet? 

g) Wird nur der jeweils veränderte Zählerstand angezeigt oder alle 
sechs? 

h) Sie könnten die 2-Bytes-Division durch eine 1-Byte-Division er¬ 
setzen. 


16.8 Vom Refresh-Register 

Die Z80-CPU ist in der Lage, dynamische RAMs zu verwalten. Das sind 
im Prinzip Speicherbausteine, die mikroskopisch kleine Kondensatoren 
enthalten. Diese sind entweder geladen oder ungeladen. Weil Konden¬ 
satoren, insbesondere kleine, ihre Ladung allmählich verlieren, muß 
diese beim dynamischen RAM in schneller Folge aufgefrischt werden - 
falls eine zu erhaltende Ladung vorhanden ist. Diesen Vorgang steuert 
das Refresh-Register, in dem ständig gezählt wird. Man kann es mit 
dem Befehl LD A,R auslesen und den erhaltenen Wert - mit Vorbehalt - 
als Zufallszahl verwenden. Wir verschaffen uns einen Überblick: 
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P16.8. 1 
REFREG 20O0 

LD 

B, F0 

06 

FO 


LGÜP 2002 

CALL 

PRINTS 

CD 

0C 

00 

2005 

CALL 

PRINTS 

CD 

0C 

00 

2008 

LD 

A,R 

ED 

5F 


200 A 

CALL 

□UTBYT 

CD 

30 

AF 

200 D 

LD 

A, 10 

3E 

10 


200F 

CALL 

WARTEN 

CD 

B8 

AF 

2012 

DJNZ 

LOOP 

10 

EE 


2014 

HALT 


76 




Experimentieren Sie mit anderen Verzögerungen und lassen Sie sie 
schließlich ganz fort. 

Leider ist diese an sich schöne Möglichkeit nicht frei von Tücken: 
Das Refresh-Register zählt streng synchron zum Programmablauf. Zu 
einem bestimmten Programmabschnitt gehört auch eine ganz 
bestimmte Anzahl von Maschinen- bzw. Taktzyklen. Und während 
dieser bestimmten Anzahl von Taktzyklen zählt das Refresh-Register 
immer wieder um den gleichen Betrag weiter. Dadurch kann es gesche¬ 
hen, daß z. B. in einer Schleife bei jedem Durchgang an derselben Stelle 
stets derselbe R-Wert ausgelesen wird und sich der Zufallseffekt in sein 
gerades Gegenteil verkehrt. 

Das folgende Programm lädt zum Experimentieren ein: TSTREF 
speichert die erhaltenen 160 Zufallszahlen nach 1200... 129F ein. 

RNDREF liest zunächst eine «ungültige» Randomzahl aus R aus und 
übernimmt sie nach B für eine einfache DJNZ-Verzögcrung. Diese soll 
den Ablauf von Durchlauf zu Durchlauf unterschiedlich verlangsamen, 
damit R unterschiedlich viel Zeit zum Weiterzählen hat. RLC C hat 
hier nur den einzigen Sinn, den Ablauf um 8 Taktzyklen zu verlangsa¬ 
men. Erst dann wird die «gültige» Zufallszahl ausgelesen. 


F'l 6 ■ 8.2 (Pr ü-f* summe s 0CCF) 


TSTREF 2000 

L.D 

B, A0 

06 

A0 


2002 

LD 

HL,1200 

2.1 

00 

12 

LAB0 2005 

CALL 

RNDREF 

CD 

0F 

20 

2008 

LD 

(HL),A 

77 



2009 

INC 

HL 

07 



200 A 

DJNZ 

LAB0 

10 

F9 


200C 

JP 

DUMP12 

C3 

DF 

AF 
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RNDREF 

2O0F 

PUSH 

BC 

C5 



2010 

LD 

A,R 

ED 

5F 


2012 

LD 

B, A 

47 


LAB 1 

2013 

RLC 

C 

CB 

01 


2015 

DJNZ 

LAB1 

10 

FC 


2017 

LD 

A, R 

ED 

5F 


2019 

POP 

BC 

CI 



201 A 

RET 


C9 



Überlegen Sie, weshalb dieser Algorithmus schon bald (im allgemeinen 
von der vierten Zahl an) zu konstanten Ergebnissen führt. Mit einigem 
Unglück können Sie aber auch Werte wie 

08 48 48 48 48 48 48 48 
48 48 48 48 .erhalten. 

A16.8.3 Wandeln Sie RNDREF so ab, daß Sie mit einer fest vorgegebe¬ 
nen Verzögerung experimentieren können. Verändern Sie diese Vor¬ 
gabe. Vielleicht erhalten auch Sie einmal 00 01 02 03 04 ...? 

A16.8.4 Stellen Sie fest, ob das R-Rcgister inkrementiert oder dekre- 
mentiert wird. Nach je wie vielen Taktzyklen wird der Inhalt um eins 
verändert? 


16.9 Vom Flag-Register 

Wir haben z. B. in den Abschnitten 5.4 und 8.2 schon etwas über Flags 
gehört und sie auch schon mehrfach praktisch angewendet. Eine Syste¬ 
matik fehlte bisher; sie soll hier in Umrissen nachgeliefert werden und 
vor allem den Gebrauch des Z80-Handbuchs erleichtern. Wir haben 
bisher mit Carry-Flag und Zero-Flag gearbeitet. 

Carry-Flag wird bei Addition und Subtraktion gesetzt, sobald ein 
Übertrag erfolgt. Es läßt sich mit SCF setzen und mit CCF komplemen¬ 
tieren, außerdem durch AND, OR und XOR löschen. Auch die Ver¬ 
gleichsbefehle CP (compare) beeinflussen Carry-Flag: Ist beispielsweise 
A = 3E, so führt, ohne daß der Inhalt des Akkumulators dabei verändert 
wird, der Befehl CP 4A zur Subtraktion 3E - 4A, bei der ein Übertrag 
erfolgt und dementsprechend Carry gesetzt wird. Wenn Carry gesetzt 
ist. bewirken die Befehle ADC (SBC entsprechend) eine Addition nicht 
nur der beiden Operanden, sondern auch noch des Übertrags dazu. 
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Zero-Flag zeigt nach gewissen Operationen an, ob der Wert null 
erreicht wurde. Ist beispielsweise A = 34 und B = 34, so führt SUB A,B 
zur Subtraktion 34 - 34 = 00, und Zero-Flag wird gesetzt; bei CP B 
auch, jedoch ohne Veränderung des Akku-Inhalts. 

Weitere Flags: 

S-Flag (sign, Vorzeichen) wird gesetzt bei «negativem» Ergebnis. Als 
negativ in diesem Sinne wird eine Zahl angesehen, deren höchstes Bit 
gesetzt ist. Immer positiv sind die Zahlen 00... 7F. Negativ in diesem 
Sinn sind die Zahlen 80... FF. 

H-Flag zeigt einen Halbbyte-Übertrag (vom 3. zum 4. Bit) an. Es sorgt z. 
B. für den richtigen Ablauf des DAA-Befehls. Es steuert diese Dinge 
jedoch intern. Der Programmierer braucht es im allgemeinen nicht zu 
beachten. 

N-Flag wirkt ebenfalls intern. 

P/V-Flag hat doppelte Bedeutung: Als Parity-Bit wird es z. B. nach AND 
gesetzt, wenn die Zahl im Akku im Binärformat eine gerade Anzahl von 
Einsen enthält. Wir kommen darauf zurück. Als OVerflow-Bit zeigt es 
einen Überlauf an. Bei 38 + 73 = AB = 1010 1011 wird beispielsweise 
als Summe zweier positiver Zahlen eine im obigen Sinne negative Zahl 
errechnet. Das könnte je nach Lesart zu einer Fehlinterpretation führen. 

Alle diese Flags sind Bits im F-Register, dessen Inhalt bitweise zu 
deuten ist. 

Eine sehr wesentliche Anwendung finden die Flags bei den bedingten 
Sprüngen. Suchen Sie bitte im Z80-Handbuch die Befehle JP c,nn, CALL 
c,nn und RET c, ferner die entsprechenden Befehle JR c,e. 
c kann dabei bedeuten: 

NZ = gleich null bzw. nicht gleich 
Z = gleich null bzw. gleich 
NC = kein Übertrag 
C = Übertrag 

PO = Parität ungerade (1, 3, 5, 7 Einsen) 

PE = Parität gerade (0, 2, 4, 6, 8 Einsen) 

P = positives Vorzeichen 
M = negatives Vorzeichen («minus») 

Damit ist alles Umrissen, was man beim praktischen Programmieren 
von den Flags wissen muß: 
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1. Sie werden beim Ablauf bestimmter Befehle automatisch gesetzt 
oder gelöscht. Nur Carry kann ohne Umweg willkürlich beeinflußt 
werden. 

2. Die bedingten Sprungbefehle fragen automatisch die bedingenden 
Bits des Flag-Registers ab und werden nach ihrer Maßgabe ausgeführt 
oder ignoriert. 

3. Darüber hinaus ist das F-Register für direkte Eingriffe nicht zugäng¬ 
lich. 

Und gerade das letztere (3.) wollen wir jetzt tun, jedoch nur zur 
theoretischen Einblicknahme, nicht für den normalen praktischen 
Gebrauch. Den Lesezugriff erzwingen wir durch PUSH AF mit nachfol¬ 
gendem POP DE, wodurch der Inhalt des F-Registers ins F-Register 
übertragen wird. Zum Schreiben verfahren wir umgekehrt. Damit kon¬ 
zipieren wir folgendes Rahmenprogramm: 

1. Wir versetzten F (von E über Stack) in einen definierten Anfangszu¬ 
stand. 

2. Wir lassen einige Speicherplätze für Testbefehle frei (NOPs). 

3. Wir lesen F über Stack aus E aus und zeigen das Resultat binär an. 


P16.9• 1 < Pr ü-f summe s OAAE ) 


TSTFLG 2OO0 

LD E,FF 


IE 

FF 


5 1 - 

20 O2 

PUSH DE 


D5 




2003 

POP AF 


Fl 




2O04 

NOF’ NÜP NOP 

NOP 

00 

00 

00 

0 O 5 2. 

2008 

NOF' NOP NOP 

NOP 

00 

00 

00 

00 

20OC 

PUSH AF 


F5 



5 3. 

2O0D 

POP DE 


Dl 




2O0E 

LD A ? E 


7B 




2 O0F 

CALL OUTBIN 


CD 

F8 

AE 


2012 

CALL F’AUSWK 


CD 

D4 

AF 


2015 

RST 0O 


C7 





Fügen wir nun 

2006 AND A AI 

ein, so wird u. a. Carry gelöscht. Wir erhalten F = 0001 0100, zwei Flags 
blieben also gesetzt. Aus dem Kommentar zu AND r geht hervor, daß 
eins davon das F-Flag ist; das andere könnte S-, Z- oder P/V-Flag sein. 
Probieren wir weiter, fügen hinzu 
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2004 LD A,7F 3E 7F 

und variieren den Wert in 2005. In symbolischer Notierung erhalten wir 
dann die Ergebnisse: 

3E 7F A7 —» 0011 1000 
3E 7E A7 —» 0011 1100 
3E 7D A7-> 0011 1100 
3E 11 A7 —> 0001 0100 
3E 10 A7-^ 0001 0000 
3E 00 A7 —» 0101 0100 

Im letzten Beispiel verriet sich Zero-Flag als Bit6 ; es wird nach AND A 
gesetzt, wenn der Inhalt des Akkumulators 00 ist. 

Wir zählen nun die Anzahl der Einsen in der Binärdarstellung unserer 
Operanden: 

Anzl(7F) = 7 Anzl(7D) = 6 Anzl(lO) = 1 

Anzl(7E) = 6 Anzl(ll) = 2 Anzl(00) = 0 

Wir beobachten, daß immer, wenn eine gerade Anzahl von Einsen 
vorliegt, Bit2 im Flag-Register gesetzt ist. Es ist offenbar - in diesem 
Zusammenhang - das Paritätsbit, das «parity even», also eine gerade 
Anzahl von Einsen anzeigt. 

Nutzanwendung 1: 

Der ASCII ist von Haus aus ein 7-bit-Code ; die zu codierenden Zeichen 
werden in den Bits6... 0 dargestellt. Bit7 bleibt zunächst unbenutzt, 
wird dann aber manchmal zur Kontrolle einer korrekten Datenübertra¬ 
gung herangezogen und so belegt, daß insgesamt eine gerade Anzahl 
von Einsen vorliegt. Wird bei einer Kontrolle P/V = 0 festgestellt, hegt 
ein Lese- oder Interpretationsfehlcr vor, dem nachzugehen ist. 

Al6.9.2 Fügen Sie in PI6.9.1 andere Operationen ein, und versuchen 
Sie, andere Flags zu identifizieren. 

Al6.9.3 Schreiben Sie ein Programm, das nach Eingabe einer zweistelli¬ 
gen Hexadezimalzahl die Anzahl der Einsen in ihrer Binärdarstellung 
ermittelt und anzeigt! 
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Nutzanwendung 2: 

Der Befehl DJNZ dekrementiert das B-Register. Dies läßt als 8-Bit- 
Rcgister maximal 256 Schleifen zu. Der Befehl CPD (und andere, siehe 
Handbuch) dekrementiert das BC-Register. Dieses läßt als 16-Bit-Regi- 
ster maximal 65536 Durchläufe zu. Wenn BC-0 erreicht ist, wird das 
PV-Flag - ziemlich zweckentfremdet - gelöscht. 

CPD ist ein Blocksuchbefehl. Wir werden ihn als solchen nicht 
besprechen, sondern benutzen ihn nur als Schleifenzähler. 


16.9.4 

3000 

DD 

21 00 00 

L.D 

IX,0000 


3004 

0 t 

34 12 

LD 

BC,1234 

ABEL 

3007 

DD 

23 

INC 

IX 


3009 

ED 

A9 

CPD 



300B 

EA 

07 30 

JP 

PE,LABEL 


300E 

DD 

22 00 12 

LD 

(1200) , i: 


3012 

C3 

DF AF 

JP 

DUMP 12 


Während hier das BC-Register für jeden Durchlauf dekrementiert wird, 
wird - von null angefangen - das IX-Register je Schleifendurchlauf 
einmal inkrementiert und zur Kontrolle nach 1200 (+01) abgelegt. Sie 
könnten versuchen, IX je Schleife zweimal (oder dreimal) zu inkremen- 
tieren. 
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Nehmen wir an, wir hätten eine Grundmenge von drei Elementen, z. B. 
0, 1, 2. Anders als in der Mengenlehre soll es jedoch gerade auf die 
Reihenfolge der Elemente ankommen. Dann sind sechs verschiedene 
Anordnungen möglich: 

012 021 102 120 201 210 

Man nennt sie Permutationen. 

Von 2 Elementen gibt es 2 Permutationen 
von 3 Elementen gibt es 6 Permutationen 
von 4 Elementen gibt es 24 Permutationen 
von 5 Elementen gibt es 120 Permutationen 

von 10 Elementen gibt es 3 628 800 Permutationen usw. Es gibt nun 
Aufgaben, die man - häufig sinnvoller - durch Überlegen, manchmal 
aber auch durch schematisches Ausprobieren lösen kann. Sehr schöne 
Aufgaben dieser Art sind Zahlenrätsel wie z. B. 

KIND mit 8270 

+ BALL der + 5966 

= SPIEL Lösung = 14236, 

bei denen jeder Buchstabe (unter Berücksichtigung des jeweiligen Stel¬ 
lenwerts) eine Variable darstellt, die für eine der Ziffern des Dezimalsy¬ 
stems steht. Die Lösung durch logisches Schließen kann ein Leckerbis¬ 
sen für Freunde des Denksports sein, aber auch das Programmieren 
macht Spaß. 

Ein Computer ist ein schneller, zuverlässiger und belastbarer Rechen¬ 
knecht, der in annehmbarer Zeit alle 3 628 800 möglichen Zuordnungen 
der 10 Ziffern zu 10 Variablen durchprüft. Wie aber erzeugt man diese 
3,63 Millionen Zuordnungen (Permutationen)? 
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17.1 Emporzählen mit Disqualifikation 

Wir versuchen zunächst einen naheliegenden, wenn auch recht primiti¬ 
ven Weg, indem wir in 5 oder 10 Speicherstellen von 0000000000 bis 
9999999999 zählen lassen und dabei prüfen, ob unzulässige oder dop¬ 
pelte Ziffern entstanden sind. Wenn ja, dann lassen wir ohne Beachtung 
weiterzählen; wenn nein, dann haben wir eine (neue) Permutation 
erreicht, mit der die Rechnung zu überprüfen wäre. 

Um den Überblick zu behalten, beschränken wir uns auf die Ziffern 
0, 1, 2, 3 und legen sie in den Speicherstellen 1201... 1204 ab. 1200 
dient als Überlaufanzeiger. Tritt hier ein Wert > 0 auf, so ist unser 
Zähler übergelaufen - Schluß! 

Grobstruktur: 

1. 1200... auf null setzen. 

2. HL auf die Ziffer ganz rechts setzen und Überlauf abfragen. 

3. (HL) inkrementieren. 

4. Wenn (HL) < 4, dann 6. 

5. (HL) = 0, HL = HL - 1, zurück nach 3. 

6. Wenn gleiche Ziffern, dann zurück nach 2. 

7. Ausgeben und zurück nach 2. 

Feinstruktur: 

6a HL neben die Ziffer ganz rechts setzen. 

6b HL dekrementieren. 

6c Wenn L = 1, dann Ausgabe 7. 

6d DE = HL. 

6e DE dekrementieren. 

6f Wenn E = 0, dann 6b. 

6g Wenn (HL) = (DE), dann zurück nach 2. 

6h Zurück nach 6e 

FT7-1.1 (Pr ü-f summe: 19F0) 


PERMUT 

3000 

CALL 

NULL12 

CD 

F4 

AF ; 1. 

LI 

3003 

LD 

HL,1204 

21 

04 

12 ; 2. 


3006 

LD 

A,(1200) 

3A 

00 

12 


3009 

AND 

A 

A7 




3O0A 

JR 

Z, L2 

28 

04 



30 OC 

CALL 

PAIJSWK 

CD 

D4 

AF 


300F 

RST 

00 

C7 
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L2 

3010 

INC 

< HL) 

34 



■S •-> . 


301 1 

L.D 

A,(HL) 

7E 





3012 

CP 

04 

FE 

04 




3014 

JR 

NZ,GLEIZI 

20 

18 


5 4. 


3016 

LD 

(HL) 5 00 

36 

00 


; 5. 


3018 

DEC 

HL 

2 B 





3019 

JR 

L2 

18 

F5 



AUSGEB 

301B 

LD 

B, 04 

06 

04 


57. 


30 ID 

LD 

HL,1201 

21 

01 

12 



3020 

CALL 

LETNL 

CD 

06 

00 


L3 

s 2 * 0 2 O» 

LD 

A,(HL) 

7E 





3024 

OR 

30 

F 6 

30 




3026 

CALL 

PRNT 

CD 

12 

00 



3029 

INC 

HL 

23 





302A 

DJNZ 

L3 

10 

F7 




302C 

JR 

LI 

18 

D5 



GLEIZI 

302E 

L.D 

HL,1205 

21 

05 

12 

5 6 a 

L4 

3031 

DEC 

HL 

2 B 



5 6 b 


3032 

LD 

A,L 

7D 



; 6 c 


3033 

CP 

01 

FE 

01 




3035 

JR 

Z,AUSGEB 

28 

E4 




3037 

PUSH 

HL 

E5 



; 6 d 


3038 

POP 

DE 

Dl 




L5 

3039 

DEC 

DE 

1 B 



; 6 e 


303A 

LD 

A, E 

7B 





303B 

AND 

A 

A7 



5 6 f 


303C 

JR 

Z, L4 

28 

F3 




303E 

LD 

C, (HL) 

4E 





303F 

LD 

A, (DE) 

1A 





3040 

CP 

C 

B9 



? 6 g 


3041 

JR 

Z, L 1 

28 

C0 




3043 

JR 

L5 

18 

F4 


; 6 h 


A17.1.2 

1. Welche Speicherstellen müssen verändert werden, um 5, 6, 7, ... 
Elemente zu permutieren? 

2. Ermitteln Sie, wieviel Zeit zwischen Programmstart und erster 
Ausgabe bei 4, 5, 6, ... Elementen vergeht! 

PI7.1.1 ist zur Lösung eines Zahlenrätsels ungeeignet. Man könnte den 
Vorlauf zwar deutlich verkürzen, indem man schon von 0123456788 
aus startet. Die zeitraubenden Zwischenläufe blieben aber trotzdem. 
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17.2 Schnelle Zufallspermutationen 


Nach dem teilweise äußerst langsamen PI7.1.1 schreiben wir nun ein 
Programm, das sehr schnell ist, die Permutationen in bunter Reihen¬ 
folge liefert und mehrfaches Hintereinanderauftreten der gleichen Per¬ 
mutation zuläßt. Für strenge statistische Untersuchungen wäre dieses 
Konzept kaum zu gebrauchen; für Spiele mit Überraschungseffekten ist 
es jedoch bestens geeignet. 

Speicherdisposition: In den zehn Speicherstellen 1200... 1209 stehen 
die zehn Ziffern 0... 9 und werden hier je zwei und zwei vertauscht. 

Grobstruktur: 

1. 1200... auf null setzen und Uhr starten. 

2. Ziffern 0... 9 einschreiben. 

3. HL auf Zufallswert 1200 ^ Zfw ^ 1200 setzen. 

4. DE dto. 

5. (HL) und (DE) vertauschen; Zwischenspeicher: C. 

6. Anzeigen und Ablauf momentan unterbrechen. 

7. Zurück nach 3. 

(8.) Randomroutine. 


P17.2- 1 (Pr ü-f summes 14F2) 


ZFF’ERM 

2800 

CALL 

NULL 12 

CD 

F4 

AF 

5 1- 


2803 

XOR 

A 

AF 





2804 

LD 

DE,1200 

1 1 

00 

12 



2807 

CALL 

TIMST 

CD 

33 

00 



280A 

XOR 

A 

AF 



52 . 


2 BOB 

LD 

B, OA 

06 

OA 




280D 

LD 

HL,1200 

21 

00 

12 


LI 

2810 

LD 

(HL),A 

77 





2811 

INC 

A 

3C 





2812 

INC 

HL 

23 





2813 

DJNZ 

LI 

10 

FB 



LOOP 

2815 

LD 

H, 12 

26 

12 


5 3. 


2817 

CALL 

RND 

CD 

3B 

28 



281A 

LD 

L, A 

6 F 





281B 

LD 

D, H 

54 



5 4. 


28 IC) 

CALL 

RND 

CD 

3B 

28 



281F 

LD 

E, A 

5F 





2820 

LD 

C,(HL) 

4E 



5 5. 


2821 

LD 

A,(DE) 

1A 
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2822 

L.D 

(HL),A 

77 




2823 

LD 

A, C 

79 




2824 

LD 

(DE) , A 

12 



AUSGEB 

2825 

LD 

HL,12O0 

21 

00 

12 ;6, 


2828 

LD 

B, 0A 

06 

0 A 



282A 

CALL 

LETNL 

CD 

06 

00 

L2 

282D 

LD 

A,(HL) 

7E 




282E 

OR 

30 

F6 

30 



2830 

CALL 

PR NT 

CD 

12 

00 


2833 

INC 

HL 

23 




2834 

DJNZ 

L2 

10 

F7 



2838 

NOR 

NOR NQP 

00 

00 

00 


2839 

JR 

LOOP 

18 

DA 

5 7 

RND 

283B 

LD 

A,(EO05) 

3A 

05 

E0 ; 8 


283E 

DAA 


27 




283F 

AND 

0 F 

E6 

0F 



2841 

RET 


C9 



Der Ablauf zeigt einen 

eventuellen Mangel und einen 

Fehler: 


1. Das Programm läuft so schnell ab, daß man die gezeigten Permutatio¬ 
nen kaum kontrollieren kann; es wurde jedoch Platz für PAUSKY oder 
PAUSWK gelassen. 

2. Schon bald treten fehlerhafte Ausgaben auf. Die Fehlersuche (debug- 
ging) nimmt in der Praxis des Programmierens einen breiten Raum ein. 
Wichtig ist dabei, sich nicht ins Bockshorn jagen zu lassen, sondern 
einen kühlen Kopf zu bewahren. Das Ausgabeformat entspricht der 
Absicht; an der Ausgabe liegt es also wohl nicht. Stimmen denn aber 
die auszugebenden Werte? D1200 liefert vereinfacht folgendes Bild: 

1200 00 01 02 00 04 05 06 07 
1208 08 09 00 00 03 00 00 00 
1210 00 00 00 00 00 00 00 00 

Hier wurden (1203) und (120C) vertauscht. Der Tausch selbst erfolgt 
korrekt, doch wurde eine unzulässige Tauschadresse erzeugt; genauer: 
ihr LSB ist falsch. Das aber wird in der RND-Routine erzeugt; also 
müssen wir hier den Fehler suchen. Die Zeilen 283B, 283F und 2841 
sind über jeden Zweifel erhaben. Wozu eigentlich das DAA? Es soll 
nichtdezimale Ziffern in dezimale umwandeln, also - für das ganze 
Byte beschrieben — beispielsweise 4C in 52. Offenbar blieb aber xC 
erhalten und erzeugte die falsche Adresse 120C. DAA funktionierte 
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B 
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A 
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B 

D 

C 

A 
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1 


B 

D 

A 

C 
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B 

A 

D 

C 
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B 

A 

C 

D 
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C 

A 

B 

D 
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i 

C 
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C 

B 

A 

D 
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C 

D 

A 

B 

* 

(2,3) 

) P23 j 


C 

D 

B 

A 

* 

(2,3) 

1 


c 

D 

A 

B 


(1,2) 



c 

A 

D 

B 


(2,3) 



c 

A 

B 

D 


(0,3) 


-- 

D 

A 

B 

C 

* 
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A 
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B 
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D 
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B 
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D 

B 

A 

C 

* 
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) P23 


D 

B 

C 

A 

* 

(2,3) 

3 3 


D 

B 

A 

C 


(1,3) 

- 1 


D 

C 

A 

B 

* 

(2,3) 

) P23 


D 

C 

B 

A 

* 

(2,3) 



D 

C 

A 

B 


(1,2) 

- < 


D 

A 

C 

B 


(2,3) 



D 

A 

B 

C 


(0, 1 ) 

- 1 

— 

A 

D 

B 

C 


(1,2) 


A 

B 

D 

C 


(2,3) 


A 

B 

C 

D 


Schluß 



P0 


Bild 17.1 Ein Pcrmutationsalgorithmus 
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also nicht wie erwartet. Hier erinnern wir uns an die Bemerkung zum 
H-Flag (Abschnitt 16.8): Es beeinflußt den Ablauf von DAA. Wir müs¬ 
sen also noch eine Operation einfügen, die die Flags in den richtigen 
definierten Zustand versetzt. Als solche bietet sich ADD 00 an: 


283B 

L_D 

A,(E005) 

3A 

05 E0 

283E 

ADD 

A , 00 

C6 

00 

2840 

DAA 


27 


284 1 

AND 

OF 

E6 

0F 

2843 

RET 


C9 



Schon ist der Schaden behoben. 


17.3 Systematisches Permutieren 

Nach den beiden Vorläufern PI7.1.1 und PI7.2.1 entwerfen wir nun ein 
Programm, das recht schnell ist, jede Permutation nur einmal auswirft 
- und das in geordneter Reihenfolge. Da der zugrunde liegende Algorith¬ 
mus nicht auf den ersten Blick erkennbar ist, holen wir etwas weiter 
aus. Wegen der Länge des Programms beschränken wir uns bei der 
ersten Verständigungsskizze auf vier Elemente: A, B, C und D. Die 
zugehörigen Speicherplätze nennen wir kurz, 0, 1, 2, 3 und meinen 
damit 1200... 1203. Ein Sternchen in Bild 17.1 soll «Ausgabe» bedeuten 
und (1,3) den Austausch von (1201) und (1203). Pxy ist die Kurzbezeich¬ 
nung eines Programmabschnitts, der das x. bis y. Element permutiert. 

Wir übersetzen diesen Algorithmus nahezu wörtlich in die Maschi¬ 
nensprache. Dabei definieren wir die Vertauschungen im BC-Register 
und tauschen analog zu PI7.2.1 (2815 ... 2824). 


p 17.3. 1 < Pr ü f summen am r ech t. en R an d) 


PERM03 

4000 

L.D 

A, 41 

3E 

41 


4002 

LD 

B, 04 

06 

04 


4004 

LD 

HL,1200 

21 

00 

LI 

400 7 

LD 

(HL) , A 

77 



4008 

INC 

A 

3C 



4009 

I NC 

HL 

**!■* 
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P 23 


P13 


PO 3 


VERTÄU 
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400A 

DJNZ 

LI 

10 

FB 



400C 

CALL 

PO 3 

CD 

48 

40 


4 OOP 

CALL 

F'AUSWK 

CD 

D4 

AF 


4012 

RST 

00 

C7 



5 0709 

4013 

CALL 

AUSGEB 

CD 

84 

40 


4016 

LD 

BC,0203 

01 

03 

02 


4019 

CALL 

VERTÄU 

CD 

79 

40 


40 IC 

CALL 

AUSGEB 

CD 

84 

40 


401F 

LD 

BC,0203 

01 

03 

02 


4022 

CALL 

VERTÄU 

CD 

79 

40 


4025 

RET 


C9 



5 OEOC 

4026 

CALL 

P23 

CD 

13 

40 

4029 

LD 

BC,0102 

01 

02 

01 


402C 

CALL 

VERTÄU 

CD 

79 

40 


402F 

CALL 

P23 

CD 

13 

40 


4032 

L..D 

BC,0103 

01 

03 

01 


4035 

CALL 

VERTÄU 

CD 

79 

40 


4038 

CALL 

P23 

CD 

13 

40 


403B 

LD 

BC,0102 

Ol 

02 

01 


403E 

CALL 

VERTÄU 

CD 

79 

40 


4041 

LD 

BC,0203 

01 

03 

02 


4044 

CALL 

VERTÄU 

CD 

79 

40 


4047 

RET 


C9 



; 1860 

4048 

CALL 

PI 3 

CD 

26 

40 

404B 

L.D 

BC,0001 

01 

01 

00 


404E 

CALL 

VERTÄU 

CD 

79 

40 


4051 

CALL 

P13 

CD 

26 

40 


4054 

LD 

BC,0002 

01 

02 

00 


4057 

CALL- 

VERTÄU 

CD 

79 

40 


405A 

CALL 

P13 

CD 

26 

40 


405D 

LD 

BC,0003 

01 

03 

00 


4060 

CALL 

VERTÄU 

CD 

79 

40 


4063 

CALL 

P13 

CD 

26 

40 


4066 

LD 

BC,0001 

01 

01 

00 


4069 

CALL 

VERTÄU 

CD 

79 

40 


406C 

L..D 

BC,0102 

01 

02 

01 


406F 

CALL 

VERTÄU 

CD 

79 

40 


4072 

LD 

BC,0203 

01 

03 

02 


4075 

CALL 

VERTÄU 

CD 

79 

40 


4078 

RET 


C9 



; 272E 

4079 

LD 

H, 12 

26 

12 



407B 

LD 

D, H 

54 




407C 

LD 

L, B 

68 




407D 

LD 

E,C 

59 




407E 

LD 

C,(HL) 

4E 




407F 

L.D 

A,(DE) 

1A 









Permutationen 

127 


4080 

LD 

(HL),A 

77 



4081 

LD 

A, C 

79 



4082 

LD 

(DE),A 

.12 



4083 

RET 


C9 

; 2AAE 

AUSGEB 

4084 

CALL 

LETNL 

CD 06 O0 



4087 

LD 

B, 04 

06 04 



4089 

LD 

HL,1200 

21 OO 12 


L2 

408C 

LD 

A,(HL) 

7E 



408D 

CALL 

PRNT 

CD 12 00 



4090 

INC 

HL 

23 



4091 

DJNZ 

L2 

10 F9 



4093 

RET 


C9 

; 2F10 


Das Programm wurde übersichtlichkeitshalber nicht auf die kürzest- 
mögliche Form gebracht. Versuchen Sie, es in folgenden Schritten zu 
verstehen: 

1. Vollziehen Sie das Vertauschungsschema Schritt für Schritt nach. 

2. Erkennen Sie das Vertauschungsschema Schritt für Schritt im Pro¬ 
gramm wieder. 

3. Ändern Sie das Programm wie folgt ab: 

a) Die Elemente U, V, W, X oder 1, 2, 3, 4 sollen permutiert werden. 

b] Speichern Sie manuell die Codes für «?», «!», « + » und «★» ein und 
starten Sie durch Einsprung an geeigneter Stelle. 

4. Überlegen Sie, wie das Programm zur Permutation von fünf Elemen¬ 
ten zu verändern wäre. 

Dieser Ansatz kann erweitert werden. Er ist wohl der schnellste Liefe¬ 
rant geordneter Permutationen. Leider stellt er erhebliche Anforderun¬ 
gen an den Fleiß, so daß wir einer interessanteren Lösung nachgehen: 
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17.4 Permutieren durch Rekursion 
GAUSS + RIESE = EUKLID 

Dieses schöne Zahlenrätsel wurde vor einiger Zeit in der Sendung 
«Kopf um Kopf» vorgestellt, ist aber auch in der einschlägigen Knobelli¬ 
teratur zu finden. Es ist nicht immer sinnvoll, den Computer überall da 
einzusetzen, wo man ihn einsetzen kann. Hier sollte man sich nicht um 
die reizvolle Denkaufgabe betrügen; aber das Programmieren ist ja auch 
Denksport! 

Rüdeger Baumann stellt in [5] auf Seite 153 ff. einen Algorithmus zur 
rekursiven Erzeugung von Permutationen vor. Rekursive (Unter-(Pro¬ 
gramme rufen sich selber auf, natürlich gut kontrolliert, damit sich der 
Ablauf nicht im Unendlichen verliert. Die Programmiersprache Pascal 
läßt Rekursionen zu, BASIC im allgemeinen nicht. Das S-BASIC unse¬ 
res MZ-700 macht hier eine Ausnahme. Es erlaubt, in FOR-TO-NEXT- 
Loops Feldvariable als Laufvariable zu verwenden. Damit läßt sich der 
o. a. Algorithmus in BASIC übersetzen: 


IO REM *** P17« 4.1 *** 

20 CL.S: PR INT"PERMU T ATIONEN": PRINT 
30 INPUT"Wie viele Elemente? "5 Ns K=N~1 
40 DIM Z <K>,I<K> 

50 FOR 1=0 TO Ks Z <I)=1s NEXT I 
60 GOSUB 1000 
70 GOTO 70 
80 s 

1000 IF K*0 THEN GOSLJB 3000 s RETURN 

1010 K=K—1s GOSUB 1000: K=K+1 

1020 FOR I<K)«0 TO K—1 

1030 GOSUB 2000 

1040 K«K~1: GOSUB 1000s K=K+1 

1050 GOSUB 2000 

1060 NEXT I<K) 

1070 RETURN 
1080 s 

2000 Z == Z (I < K) > : Z(I(K))*Z(K)i Z<K)=Z 

2010 RETURN 

3000 FOR 1*0 TO N-ls PRINTZ (I);s NEXT I 
3010 PRINT: RETURN 
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Wir gehen auf die Wirkungsweise nicht im einzelnen ein und stellen 
nur fest, daß dieses Programm die ineinander verschachtelten Vertau¬ 
schungen korrekt nachvollzieht, wenn auch nicht in der «geordneten» 
Reihenfolge von PI 7.3.1. Wir übersetzen es «wörtlich» in die Maschi¬ 
nensprache und wenden es gleich auf das oben genannte Zahlenrätsel 
an. 


P17 

.4.2 

( Pr üf summen b eq i i 

001 

0000 


3 GAUSS 

002 

0000 


5 01.09 

003 

0000 



004 

0000 


LETNLs 

005 

0000 


PRINTS; 

006 

0000 


PRNTs 

007 

0000 


MSG s 

008 

0000 


GETKY: 

009 

0000 


BELL: 

010 

0000 


5 

011 

0000 


ZO: 

012 

0000 


CARRY: 

013 

0000 


NULL: 

014 

0000 


K: 

015 

0000 


IO: 

016 

0000 


Z: 

017 

0000 


ADIK: 

018 

0000 


AD ZK: 

019 

0000 


ADZIK: 

020 

0000 


5 

021 

0000 



022 

4000 


5 

023 

4000 

CD1C40 

START: 

024 

4003 

CD3840 


025 

4006 

CD4C40 


026 

4009 

11CF41 


027 

400C 

CD1500 


028 

4 OOP 

0620 


029 

401 1 

CD3E00 

LSO: 

030 

4014 

1OFB 


031 

4016 

CD1B00 

LSI : 

032 

4019 

28FB 


033 

401B 

C7 


034 

40 IC 


5 

035 

401 C 

11B641 

GARIEU: 

036 

401F 

CD1500 



men hier mit "*") 

+ RIESE = EUKLID 
84 17.30 

EÜU 0006 
EQU 00OCH 
EQLJ 0012H 
EQU 0015H 
EQU 001BH 
EQU 003EH 

EQU 1200H «Z0...Z9 

EQU Z0+10 

EQU CARRY+01 

EQU NULL+01 

EQU K+Ol ;IO...19 

EQU 10+10 

EQU Z+Ol 

EQU ADIK+02 

EQU ADZK+02 

REL 400OH 

CALL GARIEU 
CALL INIT 
CALL PERM 
LD DE,TABEND 
CALL MSG 
LD B,20H 
CALL BELL 
DJNZ LSO 
CALL GETKY 
JR Z,LSI 

RST 00 •#0AD8 

LD DE,TABGAU 
CALL MSG 
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037 

4022 

CDO600 


CALL 

LETNL 

038 

4025 

11BF41 


L.D 

DE,TABRIE 

039 

4028 

CD1500 


CALL 

MSG 

040 

402B 

CDO600 


CALL 

LETNL 

041 

402E 

11C741 


LD 

DE,TABEUK 

042 

4031 

CD15O0 


CALL 

MSG 

043 

4034 

CD0600 


CALL 

LETNL 

044 

4037 

C9 


RET 


045 

4038 


5 



046 

4038 

3 Eü 09 

INITs 

L.D 

A, 09 

047 

403A 

320C12 


LD 

(K) , A 

048 

403D 

AF 


XOR 

A 

049 

403E 

320B12 


LD 

(NULL),A 

050 

4041 

060A 


LD 

B, 0AH 

051 

4043 

210012 


L.D 

HL, ZO 

052 

4046 

77 

LIN0s 

LD 

(HL),A 

053 

4047 

3C 


INC 

A 

054 

4048 

23 


INC 

HL 

055 

4049 

10FB 


DJNZ 

LIN0 

056 

404B 

C9 


RET 


057 

404C 


5 



058 

404C 

3A0C12 

PERM: 

LD 

A, (K) 

059 

404F 

A7 


AND 

A 

060 

4050 

C25740 


JP 

NZ,LP0 

061 

4053 

CD8940 


CALL 

PRUEF 

062 

4056 

C9 


RET 


063 

4057 

210C12 

LP0: 

LD 

HL, K 

064 

405A 

35 


DEC 

(HL) 

065 

405B 

CD4C40 


CALL 

PERM 

066 

405E 

210C12 


LD 

HL, K 

067 

4061 

34 


INC 

(HL) 

068 

4062 

CD7541 


CALL 

SADIK 

069 

4065 

2A1812 


LD 

HL,(ADIK) 

070 

4068 

3600 


LD 

(HL.) ,00 

071 

406h 

CD9E41 

LP 1 : 

CALL 

TAUSCH 

072 

406D 

210C12 


LD 

HL, K 

073 

4070 

35 


DEC 

(HL) 

074 

4071 

CD4C40 


CALL 

PERM 

075 

4074 

210C12 


LD 

HL, K 

076 

4077 

34 


INC 

(HL) 

077 

4078 

CD9E41 


CALL 

TAUSCH 

078 

407B 

CD7541 


CALL 

SADIK 

079 

407E 

2A1812 


LD 

HL,(ADIK) 

080 

4081 

34 


INC 

(HL) 

081 

4082 

3A0C12 


LD 

A, (K) 

082 

4085 

BE 


CP 

(HL) 


;* 13F2 


3*1874 


3 *2178 
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083 4086 20E2 

084 4088 C9 

085 4089 ■ 

086 4089 AF F'RUEFs 

087 408A 320A12 

088 408D 012108 

089 4090 CDB440 

090 4093 018408 

091 4096 CDB440 

092 4099 012609 

093 409C CDB440 

094 409F 014500 

095 40A2 CDB440 

096 40A5 017903 

097 40A8 CDB440 

098 40AB 01B20B 

099 40AE CDB440 

100 40B1 C3EF40 

101 40B4 78 PRUEF2: 

102 40B5 32D340 

103 40B8 79 

104 40B9 CB3F 

105 40BB CB3F 

106 40BD CB3F 

107 40BF CB3F 

108 40C1 32D640 

109 40C4 79 

110 40C5 E60F 

111 40C7 32DD40 

112 40CA DD21O012 

113 40CE 3A0A12 

114 4©D 1 DD8600 L.P20: 

115 40D4 DD8600 LP21: 

116 40D7 27 

117 40D8 4F 

118 40D9 E60F 

119 40DB DDBE00 LP22: 

120 40DE 200D 

121 40E0 79 

122 40E1 CB3F 

123 40E3 CB3F 

124 40E5 CB3F 

125 40E7 CB3F 

126 40E9 320A12 

127 40EC C9 

128 40ED Fl 


JR 

NZ, L.P 1 


RET 


;*2BFC 

XOR 

A 


LD 

(CARRY),A 


LD 

BC, 08211-1 


CALL 

PRUEF2 


LD 

BC,G884H 


CALL 

PRUEF2 


LD 

BC,0926H 


CALL 

PRUEF2 


L.D 

BC,O045H 


CALL 

PRTJEF2 


LD 

BC,0379H 


CALL 

PRÜEF2 


L.D 

BC,0BB2H 

;ZB-NULL 

CALL 

PRLJEF2 


JP 

AUSGEB 

;*3BD9 

L.D 

A, B 


LD 

(LP2O+02), 

A 

LD 

A, C 


BRL 

A 


SRL 

A 


SRL 

A 


SRL 

A 


LD 

(LP21+02), 

A 

LD 

A, C 


AND 

OFH 


LD 

(LP22+02), 

A 

LD 

IX, zo 


LD 

A,(CARRY) 

;*47A2 

ADD 

A,(IX+00) 


ADD 

A, (IX+00) 


DAA 



LD 

C, A 


AND 

OFH 


CP 

(IX+00) 


JR 

NZ,AUS 


LD 

A,C 


SRL 

A 


SRL 

A 


SRL 

A 


SRL 

A 


LD 

(CARRY),A 


RET 



POP 

AF 



AUSs 
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40EE 

C9 

RET 


; *550D 

130 

40EF 


s 



131 

40EF 

CDO60O 

AUSGEBs CALL 

LETNL 


132 

40F2 

CD0CO0 

CALL 

PRINTS 


133 

40F5 

CD0C00 

CALL 

PRINTS 


134 

40F8 

3A0312 

LD 

A,(ZO+03) 

; = ( Z 3) 

135 

40FB 

CD6F41 

CALL 

PRNT2 


136 

40FE 

3A0012 

L.D 

A,(ZO) 

;=(ZO) 

137 

4101 

CD6F41 

CALL 

PRNT2 


138 

4104 

3A0912 

LD 

A,(Z0+O9) 

5 = < Z9) 

139 

4107 

CD6F41 

CALL 

PRNT2 


140 

410A 

3A0812 

LD 

A,(ZO+08) 

;=(Z 8 ) 

141 

410D 

CD6F41 

CALL 

PRNT2 


142 

4110 

3A0812 

LD 

A,<Z0+08> 

; «= (Z 8 ) 

143 

4113 

CD6F41 

CALL 

PRNT2 


144 

4116 

CDO6O0 

CALL 

LETNL 


145 

4119 

3E2B 

LD 

A, 2BH 


146 

41 1B 

CD1200 

CALL 

F’RNT 


147 

41 IE 

CDOCOO 

CALL 

PRINTS 


148 

4121 

3A0712 

LD 

A,(Z0+O7) 

;=(Z7) 

149 

4124 

CD6F41 

CALL 

PRNT2 


150 

4127 

3A0412 

LD 

A,(ZO+04> 

;=(Z4) 

151 

412A 

CD6F41 

CALL 

PRNT2 


152 

412D 

3A0212 

LD 

A,(Z0+O2) 

;*677A 

153 

4130 

CD6F41 

CALL 

PRNT2 


154 

4133 

3A0812 

LD 

A,(Z0+08) 

;«(Z 8 ) 

155 

4136 

CD6F41 

CALL 

PRNT2 


156 

4139 

3A0212 

LD 

A,(Z0+02) 

;~(Z 2 ) 

157 

4130 

CD6F41 

CALL 

PRNT2 


158 

413F 

CD0600 

CALL 

LETNL 


159 

4142 

3E3D 

LD 

A, 3DH 

JJ — 

160 

4144 

CD1200 

CALL 

F'RNT 


161 

4147 

3A0212 

LD 

A, < ZO+02) 

;—(Z 2 ) 

162 

414A 

CD6F41 

CALL 

PRNT2 


163 

414D 

3A0912 

LD 

A,(ZO+09) 

;=(Z9) 

164 

4150 

CD6F41 

CALL 

PRNT2 


165 

4153 

3A0512 

LD 

A,(Z0+05) 

; = (Z 5) 

166 

4156 

CD6F41 

CALL 

PRNT2 


167 

4159 

3A0612 

LD 

A,(ZO+06) 

;=(Z6) 

168 

415C 

CD6F41 

CALL 

PRNT2 


169 

415F 

3A0412 

LD 

A, (ZO+04) 

5 = (Z4) 

170 

4162 

CD6F41 

CALL 

PRNT2 


171 

4165 

3A0 112 

LD 

A, (Z04-01) 

?=(Z1) 

172 

4168 

CD6F41 

CALL 

PRNT2 


173 

416B 

CD06O0 

CALL 

LETNL 


174 

416E 

C9 

RET 
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175 416F F630 PRNT2: 

176 4171 CD12O0 

177 4174 C9 

1784175 ■ 

179 4175 210D12 SADIKs 

180 4178 3A0C12 

181 417B 85 

182 417C 6F 

183 417D 221812 

184 4180 C9 

185 4181 21O012 SADZK: 

186 4184 3A0C12 

187 4187 85 

188 4188 6F 

189 4189 221A12 

190 418C C9 

191 418D CD7541 SADZIK: 

192 4190 210012 

193 4193 ED5B1S12 

194 4197 1A 

195 4198 85 

196 4199 6F 

197 419A 221C12 

198 419D C9 

199 419E ■ 

200 419E CD8D41 TAUSCH 

201 41A1 CD8141 

202 41A4 2A1C12 

203 41A7 ED5B1A12 

204 41 AB 7E 

205 41AC 321712 

206 41AF 1A 

207 41B0 77 

208 41B1 3A1712 

209 41B4 12 

210 4IBS C9 

211 41B6 , 

212 41B6 16 TABGAU: 

213 41B7 20204741 

214 41BB 555353 

215 41BE OD 

216 41 BF 2B205249 TABRIE: 

217 41C3 455345 

218 41C6 0D 

219 41C7 3D45554B TABEUK: 

220 41CB 4C4944 

221 4ICE OD 


0R 30H 
CALL PRNT 

RET ;*7DFB 

LD HL,10 
LD A,(K) 

ADD A,L 
LD L,A 
LD (ADIK),HL 

RET 

LD HL,ZO 
LD A, <K) 

ADD A,L 
LD L, A 
LD (ADZK),HL 
RET 

CALL SADIK 
LD HL,ZO 
LD DE,(ADIK) 

L.D A, (DE) 

ADD A,L 

L.D L, A 

LD (ADZIK),HL 

RET .*8881 

CALL SADZIK 
CALL SADZK 
LD HL,(ADZIK) 

LD DE,(ADZK) 

L.D A, (HL) 

LD (Z > , A 
LD A,(DE) 

LD (HL),A 
LD A,(Z) 

LD (DE),A 

RET ;*901F 

DEFB 16H 
DEFM ’ GAUSS’ 

DEFB 0DH 
DEFM ’ + RIESE’ 

DEFB 0DH 
DEFM ’-EUKLID’ 


DEFB ODH 
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o r> 

41CF 454E4445 

TABEND: DEFM ' ENDE' 

#9706 

O T, 

41D3 OD 

DEFB 0DH 5 

224 

41D4 

5 


225 

41D4 

END 



1200... 1209 

Z0... Z9 zu permutierende Ziffern 

((011)) 


120A 

CARRY ist eine Carry-Simulation 

1(012)) 


120B 

NULL zur einheitlichen Addition 

((013)) 


120C 

K: Verschachtelungstiefe 

((014)) 


120D... 1216 

10... 19: Laufvariable I(K) 

((015)) 


1217 

Z: dritte Variable zum Tauschen 

((016)) 


1218... 1219 

ADIK: Adresse von I(K) 

((017)) 


121A...121B 

ADZK: Adresse von Z(K) 

((018)) 


121C...121D 

ADZIK: Adresse von Z(I(K)) 

((019)) 

START: Das Hauptprogramm hat nur eine wesentliche Auf- 

((023)) 


gäbe: Es ruft das Unterprogramm PERMutieren auf. Alles 
andere ist lediglich Koordination von leicht verständlichen 
Nebenaufgaben, die bei den jeweiligen Programmabschnitten 
erläutert werden. 

GARIEU: Schreibt die Namen der drei Mathematiker in Form ((035)) 
einer Addition untereinander auf den Bildschirm. 

INIT: Initialisiert die Variablen. PERM beginnt in der 9. ((046)) 

Ebene. NULL erhält den Wert null. Den zu permutierenden 
Elementen Z0...Z9 werden die Anfangswerte zugewiesen. 

PERM: ist eine nahezu wörtliche Übersetzung der BASIC- ((058)) 
Programmzeilen 1000... 1070. Anders als dort werden hier 
nur die Permutationen ausgegeben, die das Zahlenrätsel er¬ 
füllen. 

PRUEF: setzt zuerst das simulierte Carry auf null. Dann prüft ((086)) 
es, ob die zuerst auszuführende Teiladdition S + E = D erfüllt 
ist. Die Buchstaben der drei Namen sind den Variablen Zi wie 
folgt zugeordnet: 

ADEGIKLRSU 

Z0 ZI Z2 Z3 Z4 Z5 Z6 ZI Z8 Z9 

LD BC,0821H codiert die Tciladdition Z8 + Z2 = ZI bzw. S + 

E = D. 
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PRUEF2: führt die eigentliche Prüfung durch. Das B-Register ((101)) 
enthält den Index des obersten Summanden; er wird als Offset 
zu IX nach 40D3 eingespeichert. Das höherwertige Nibble des 
C-Rcgistcrs enthält den Index des mittleren Summanden, der 
als Offset nach 40D6 geschickt wird, und das niederwertige 
Nibble den Index der jeweiligen Ziffer der Teilsumme. Stellt 
sich nach dem Maskieren mit 0F Ungleichheit ein, wird die 
Prüfung sofort abgebrochen, denn alle weiteren Teilprüfungen 
wären Zeitvergeudung. Bei Gleichheit wird die nach C zwi¬ 
schengespeicherte unveränderte Tcilsumme zurückgeholt 
und um 4 Bit nach rechts geshiftet. Danach enthält der Akku 
entweder «O» oder — bei Übertrag — «1». Diese Zahl wird im 
Pscudo-Carry aufbewahrt. 

AUSGEB: Durchläuft eine Permutation alle Prüfungen erfolg- ((131)) 
reich, so ist sie als Lösung aufbereitet auszugeben. Zu Zeile 
134 mache man sich klar, daß man Z3 erreicht, indem man im 
Speicher von Z0 aus drei Stellen weitergeht. Z0+03 steht also 
für Z3, genauer: für den Speicherplatz, in den der Wert der 
Variablen Z3 eingeschrieben ist. 

SADIK: Setzt bzw. berechnet die Adresse von I(K) und legt sie ((179)) 
nach 1218 ( + 1) ab. 

SADZK: Berechnet die Adresse von Z(K) und legt sie nach ((185)) 
121A (+1) ab. 

SADZIK: Berechnet die Adresse von Z(I(K)) und legt sie nach ((191)) 
121C (+1) ab. 

TAUSCH: ist sozusagen identisch mit Zeile 2000 des BASIC- ((200)) 
Programms. 

Daß dieses Programm schon in zweieinhalb Minuten alle Lösungen des 
Zahlenrätsels gefunden hat, ist kein Maß für seine Güte, denn es ist 
purer Zufall, daß die Lösungen in der hier gelieferten Reihenfolge der 
Permutationen schon recht früh auftreten. Aussagekräftiger ist die 
Gesamtlaufzeit. Sie beträgt hier 24 min gegenüber 9 min bei der am 
Ende von Abschnitt 17.3 angedeuteten Lösung. Dafür ist PI 7.4.2 mit 
468 Bytes deutlich kürzer als jene Lösung (871 Bytes) und im Ansatz 
wesentlich interessanter. 
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Zwei Anregungen für verregnete Ferientage 
MAX 

+ bglte; maxund 

•+• BUSCH + MORITZ 

“MORITZ •-*= WBUSCH 

1. Zu jedem der beiden Zahlenrät.sei existiert 
mindestens eine Lösung. 

2« Man wähle ein geeignetes Zahl System. 

3. Vor evtl. Abänderung von P17.4 schätze man 
die zu erwartende Laufzeit ab. 

4. Der Kreativität sind beim Erfinden geeigne- 
ter A1yorithmen keine Gren z &n gesetzt! 
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Musik läuft im allgemeinen nicht so schnell ab, als daß man sie nicht 
auch in BASIC definieren könnte. Wir wollen aber in Abschnitt 19.4 
auch noch Bewegung dazu darstellen, und dafür wäre BASIC viel zu 
langsam. Außerdem kann man von der Maschinensprache her den 
Tongenerator im 8253 sehr gut manipulieren. 


18.1 Musik mit vorgegebenen Tönen 

Zunächst betrachten wir die einem Evergreen nachempfundene Me¬ 
lodie: 
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Bild 18.1 Die Melodie 


Ihre Codierung ist auf den Seiten 63 ff. des Sharp-Handbuchs beschrie¬ 
ben. Zum Verständnis sollte man wissen, daß abweichend von unserer 
deutschen Bezeichnung im Amerikanischen (und von den Japanern 
übernommen) «unser Ton H» als «B» bezeichnet wird. Deshalb müssen 
wir «unser B» als «Ais», geschrieben «+A» ansprechen. 
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Obige Melodie wäre in BASIC wie folgt zu codieren: 

+A3R+AR+AB+AR+GR+GR+G+A+GR+AR+AR+AB+A+D+FF 

B+A+D+D+DR(CR) 

Dabei steht 3 für Achtelnote und R für Pause (repose). 

Für ein Maschinenprogramm wird das in ASCII-Wcrte umgesetzt und 
in unseren Datenbereich eingespeichert. 

piS. 1.1 (Prü-fsummes 0BC3) 

1300 23 41 33 52 23 41 52 

130C 52 23 47 52 23 47 52 

1318 47 52 23 41 52 23 41 

1324 41 23 44 23 46 46 42 

1330 44 23 44 52 OD 

Wir übergeben die Anfangsadresse dieses Strings im DE-Register und 
rufen die Monitorroutine MELDY auf. Zweckmäßigerweise verläßt 
man sich nicht darauf, daß mehr oder weniger per Zufall ein brauchba¬ 
res Tempo vorgegeben ist, sondern bestimmt mittels XTEMP: 


23 41 42 23 41 
23 47 23 41 23 
52 23 41 42 23 
23 41 23 44 23 


P18. 1 

r? 


2000 

LD 

A, 04 

2002 

CALL 

XTEMP 

2005 

LD 

DE, 13< 

2008 

CALL 

MELDY 

200B 

RST 

00 


3E 04 ;variieren 

CD 41 O0 
11 00 13 
CD 30 00 
C7 


18.2 Manipulation der Tonerzeugung 

Der Komfort fertig vorgegebener Töne ist nicht immer willkommen. 
Für den Maschinenprogrammierer ist es oft interessanter, näher an der 
Hardware manipulieren zu können. Die letzte Konsequenz werden wir 
nicht erreichen, denn unser MZ-700 ist mit einem Intervall-Timer 8253 
ausgestattet, der u. a. die Uhr taktet, hier aber je nach eingegebenem 
Zählwert die diesem entsprechende Frequenz ausgibt. 

Die Routine MELDY wird mit Adresse 0030 aufgerufen. Dort finden 
wir im Assemblcrlisting C3 C7 01 bzw. JP 01C7 mit der symbolischen 
Adresse ?MELDY. Ab 01C7 werden zunächst drei Doppelregister geret¬ 
tet und in 01D1 (DE) nach A geladen; das erste (oder später ein anderes) 
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Zeichen unseres Notenstrings steht jetzt im Akku. Wir nehmen an, daß 
das keins der Sonderzeichen +, D7, # ist, so daß wegen «NZ» von 
01EF nach 01EF + 6 = 01F5 gesprungen wird. (Beachten Sie die von 
unserer Darstellungs- und Zählweise verschiedene Codierung des 
Sprungs!) An der neuen Stelle wird ONPU aufgerufen, ein Programm¬ 
teil, der aus den Notenwerttabellen 026C ... 029A die vierstellige Hexa¬ 
dezimalzahl herausliest, die dem Intervall-Timer zu übergeben ist. 
Wurde die richtige Zahl gefunden, erfolgt von 0221 aus ein Sprung nach 
022C (ONP2). Das E-Register wird aus der gefundenen richtigen 
Adresse (in HL) mit dem LSB des Delays (Zählverzögerung) geladen und 
nach INC HL das D-Register mit dem MSB. Nach einer längeren 
Verarbeitung trifft der Prozessor in 026B auf ein RET, das ihn nach 01FB 
zurückführt. Drei Zeilen tiefer finden wir CALL MLDST mit dem 
Kommentar MELODY START. Hilft das weiter? Wir suchen ab 02AB 
weiter. Zeile 02B4 lautet im Disassemblerformat LD HL,E004, und in 
den beiden nächsten Zeilen wird der Inhalt von DE (also das Delay) dem 
8253 übergeben. Vergleichen Sie dazu die Aufstellung auf Seite 130 des 
Sharp-Handbuchs. Das regt uns zu einem Versuch an: Wir laden 
zunächst die Adresse von CO des 8253 nach HL und den Phantasiewert 
1111 nach DE, um dann mit CALL 02B7 mitten in MLDST hineinzu¬ 
springen. Beim weiteren Ausbau dieses Ansatzes stoßen wir auf 
Schwierigkeiten. Haben wir etwas übersehen? Zunächst funktioniert 
der Rücksprung nicht sicher, denn da folgt ja noch ein POP DE, das den 
Stapel verändert. Wir müßten also schon beim PUSH DE in 02B2 
einspringen. Fehlt dann aber nicht die 8253-Adresse? Sehen Sie bitte in 
02B4 genau nach! Dort wird sie ja unter dem symbolischen Namen 
CONTO nach HL geladen. Noch eins müssen wir beachten: In 02B3 
werden die Inhalte von DE und HL ausgetauscht. Wir müssen das Delay 
also jetzt nach HL laden. Damit ergibt sich ein neuer Ansatz: 

FT 8 - 2 - 1 

3000 LD HL,1111 21 11 11 

3003 CALL 02B2 CD B2 02 

3006 JR 3006 18 FE 

Die Endlosschleife soll den bei Tonexperimenten störenden Meldeton 
des Monitors unterdrücken. Ein Dauerton ist die Folge. Wir hätten die 
Tonerzeugung mit MLDSP beenden müssen. Also wandeln wir den 
Schluß so ab: 
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3006 CALL ML DSF' CD BE 02 

3009 HALT 76 


Jetzt hören wir gar nichts; wir haben ja den Ton sofort nach Erzeugung 
unterdrückt. Es muß noch eine Verzögerung eingefügt werden: 


Pia. 2 . 

A. 





3006 

LD 

A, 40 

3E 

40 


3008 

CALL 

WARTEN 

CD 

B8 

AF 

30 OB 

CALL 

MLDSP 

CD 

BE 

02 

300E 

CALL 

PAUSKY 

CD 

D9 

AF 

3011 

RST 

00 

C7 




;variieren 


Wenn Sie nicht vergessen haben, das EBS zu laden, verläuft jetzt alles 
nach Wunsch, und wir versuchen eine Weiterentwicklung. 


18.3 Effekt-Sirene 

Wenn wir das Delay kontinuierlich ändern, müßte auch ein sich konti¬ 
nuierlich ändernder Ton die Folge sein. Wir erzielen das, indem wir HL 
dekrementieren. Da in MLDST das HL-Register verändert wird, müssen 
wir es auf den Stapel retten. Daraus ergibt sich schließlich 

PIS.3.1 


4000 

LD 

HL,1111 

21 

11 11 

4003 

PUSH 

HL 

E5 


4004 

CALL 

TGNAB 

CD 

B2 02 

4007 

PGP 

HL 

El 


4008 

DEC 

HL 

2B 


4009 

LD 

A, H 

7C 


400A 

AND 

A 

A7 


40 OB 

JR 

NZ,4003 

20 

F6 

40 OD 

CALL 

MLDSP 

CD 

BE 02 

40 10 

CALL 

SBMONI 

CD 

B3 AF 

4013 

JR 

4000 

18 

EB 

SBMONI erlaubt uns, die Sirene zu stoppen. - 

Versuchen Sie auch 

andere Delay-Werte, 

vor allem in 4002. 




Al8.3.2 Schreiben Sie ein Programm für eine Sirene mit abwechselnd 
ansteigendem und abfallendem Ton. 
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Von den vielen Grafiksymbolen, die unser MZ-700 bereithält, benutzen 
wir jetzt die Bildschirmcodes FO... FF (vgl. Sharp-Handbuch Seite 159), 
um die Darstellungsmöglichkeit auf (2 ★ 40) ★ (2 ★ 25) = 4000 
Elemente zu verfeinern. Es lohnt sich, sich mit der Systematik der 
Codierung vertraut zu machen: 

□ ei ri in i . a r 

F0 Fl F2 F3 F4 F5 F6 F7 



F8 F9 FA FB FC FD FE FF 


Bild 19.1 Die Viertelung der Schreibposition 


Das MSN (most significant nibble) ist bei diesen Symbolen stets F. Das 
LSN ergibt sich als Summe der Werte der einzelnen Matrixviertel: 

Links oben: 1 rechts oben: 2 
links unten: 4 rechts unten: 8 


Sollen alle vier Viertel gesetzt werden, errechnet sich der Bildschirm¬ 
code zu FO + 1 + 2 + 4 + 8 = FF. 
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19.1 Bildschirmmanipulation mit Tabelle 

Wir arbeiten nun mit folgender Tabelle: 

PI9.1.1 (Prüfsumme: 2340 

1300 DO 32 FO DO 34 Fl DO 36 F2 DO 3B F3 

130C DO 82 F4 DO 84 F5 DO 86 F6 DO 88 F7 

1318 DO D2 F8 DO D4 F9 DO D6 FA DO D8 FB 

1324 Dl 22 FC Dl 24 FD Dl 26 FE Dl 28 FF 

Die Tripel (Dreiergruppen) enthalten je ADDH (MSB der Bildschirm¬ 
adresse), ADDL und Bildschirmcode. Die erste Eintragung bedeutet, 
daß in D032 des Bildschirmspeichers der Code FO eingeschrieben wer¬ 
den soll. Wir sind dabei - ohne Nachteile im folgenden - um der 
besseren Lesbarkeit willen vom von Neumannschen Prinzip abgewi- 
chen. 

Programmstruktur: 

1. Bildschirm löschen. 

2. B-Register für 16 Symbole mit 10h laden. 

3. IX-Register auf Tabellenanfang setzen. 

4. ADDH holen und H-Register damit laden. 

5. ADDL holen und L-Register damit laden. 

6. Bildschirmcode in den Akku holen. 

7. ... und indirekt ins Video-RAM einspeichern. 

8. IX dreimal inkrementieren. 

9. B-Register dekrementieren und - wenn nicht null - zurück nach 4. 

10. PAUSKY oder PAUSWK und Monitor. 

A19.1.2 Schreiben Sie nach diesen Angaben ein Programm. 


19.2 Drei Tanzpositionen 

Wir arbeiten nun darauf hin, auf dem Bildschirm Bewegung vorzutäu¬ 
schen, und stellen dazu einen Tänzer in drei Positionen dar. Die dazu 
benötigten Grafiksymbole speichern wir gleich zeilenweise um. Dazu 
setzen wir die Anfänge der Bildzeilen und die Position (Bild 19.2) in 
Tabellen um: 
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Dl 75 
Dl 9 D 
D1C5 
D.l ED 
0215 
D23D 
D265 
D28D 
D2B5 
D2DD 
D305 
D32D 
D355 
D37D 
D3A5 
D3CD 

Bild 19.2 Tänzer, Position 1 


Die Zahlen am linken Rand von Bild 19.2 geben die Bildzeilenanfänge 
an. Daraus folgt 

FT 9.2- 1 (Pr üf summe: 1532) 


TBZANF 1400 

Dl 

75 

Dl 

9D 

Dl 

C5 

Dl 

ED 

1408 

D2 

15 

D2 

3D 

D2 

65 

D2 

8D 

1410 

D2 

B5 

D2 

DD 

D3 

05 

D3 

2D 

1418 

D3 

55 

D3 

7D 

D3 

A5 

D3 

CD 


Nun muß Bild 19.2 in eine Tabelle der Bildschirmcodes umgesetzt 
werden: 

P19.2.2 « TBP0S1 (Prüfsumme: D53E) 

1420 F0 F0 F0 F0 F0 F0 F0 FO FC F0 FO FO FO FO 

142E F0 F0 F0 FO F0 FO FC FO FO FO FO FO FO FO 

143C FO FO FO FO FO FE FF FD FO FO FO FO FO FO 

144A FO FO FO FO FO FA FF F5 FO FO FO FO FO FO 

1458 FO FO FO FO FO F8 FF F4 FO FO FO FO FO FO 

1466 FO FO FO FO F8 FF FF FF F4 FO FO FO FO FO 

1474 FO FO FO F8 FF FF FF FF FF F4 FO FO FO FO 

1482 FO FO F8 FF F7 FA FF F5 FB FF F4 FO FO FO 

1490 FO FO FO FB FD FA FF F5 FE F7 FO FO FO FO 

149E FO FO FO FO FB FF FF FF F7 FO FO FO FO FO 

14AC FO FO FO FO F8 FF FF F5 FO FO FO FO FO FO 
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14BA FO F© F© FC FF FF FF FF F4 F© FÖ F© FO F© 

14C8 F© F© FE FF F3 F© F© FB FF F4 F© F© F© F© 

14D6 F© F2 FF FD F© F© F© F© F3 FF F4 F© F© F© 

14E4 F© FO F2 FF FD F© F© F© F© F2 FF FC FB F6 

14F2 F© F© FB FE Fl FÖ F© F© F© F© F© FB F7 F© 

TB POS 1 enthält mehr Information als nötig. Viele FOs könnten einge¬ 
spart werden. Wir wählen diesen Weg um der besseren Lesbarkeit 
willen und um die Programmgestaltung zu vereinfachen. 

Im Hinblick auf die einheitliche Ausgabe aller drei Bilder verfassen 
wir folgendes Programm: 


P19.2-3 (Prüfsumme: 132F) 


START 

200O 

CALL 

CLS 

CD 

9F 

AF 



2003 

JP 

POS1 

G3 

29 

20 


BILD 

2006 

LD 

B, 10 

06 

10 




2008 

LD 

IX,TBZANF 

DD 

21 

00 

14 

LAB0 

200C 

PUSH 

BC 

C5 



;H(hin) 


200D 

LD 

H, (IX+00) 

DD 

66 

00 


20 10 

LD 

L,(IX+01) 

DD 

6E 

01 

5 L (h i n) 


2013 

LD 

B, 0E 

06 

0E 


;14 Symb 

LAB1 

2015 

LD 

A,(IY+00) 

FD 

7E 

00 

;IY=her 


2018 

LD 

(HL)„A 

77 





2019 

INC 

IY 

FD 

23 




201B 

INC 

HL 

23 





20 IC 

DJNZ 

LAB1 

10 

F7 




201E 

INC 

IX 

DD 

DT 




2020 

INC 

IX 

DD 

23 




2022 

POP 

BC 

CI 





2023 

DJNZ 

LAB0 

10 

E7 




2025 

NOP 


00 



;später 


2026 

NOP 


00 



5 h i er 


2027 

NOP 


00 



;Musik 


2028 

RET 


C9 




POS1 

2029 

LD 

IY„TBPÜS1 

FD 

21 

20 

14 


202D 

CALL 

BILD 

CD 

06 

20 



2030 

HALT 


76 



5 (RET) 


Wir testen das Programm in diesem Zustand, sind zufrieden und saven: 
S120020302000. Ganz genauso stellen wir die Tabelle für Position 2 
auf: 
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F'19.2.4 - TBPGS2 (Prüf summe: D566) 

1500 FO FO F0 F0 F0 F0 F8 F4 F0 F0 F0 F0 F0 FO 
150E F0 F0 F0 F0 F0 F8 FF FF F4 F0 F0 F0 F0 F0 
151C F0 F0 F0 F0 F0 F0 FF FF F0 F0 F0 F0 F0 FO 
152A FO F0 F0 F0 FO FO FE FD FO FO FO FO FO FO 
1538 FO FO FO FO FO FE FF F'F FD FO FO FO FO FO 
1546 FO FO FO FO FE FF FF FF FF FD FO FO FO FO 
1554 FO FO FO FE FF Fl FF FF F2 FF FD FO FO FO 
1562 FO FO FO F2 FF F4 FF FF F8 FF Fl FO FO FO 
1570 FO FO FO FO F2 FF FF FF FF Fl FO FO FO FO 
157E FO FO FO FO FO FA FF FF F5 FO FO FO FO FO 
158C FO FO FO FO F8 FF FF FF FF F4 FO FO FO FO 
159A FO FO FO F8 FF F7 FO FO FB FF F4 FO FO FO 
15A8 FO FO FO FF FF FO FO FO FO FF FF FO FO FO 
15B6 FO FO FO FA FF FO FO FO FO FF F5 FO FO FO 
15G4 FO FO FO FO FF FD FO FO FE FF FO FO FO FO 
15D2 FO FO F8 F'F F3 FO FO FO FO F3 FF F4 FO FO 


P19.2.5 

P0S2 2031 LD IY,TBP0S2 FD 21 00 15 

2035 CALL BILD CD 06 20 

2038 HALT 76 5 (RET) 
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Testen Sie diesen Abschnitt und vergessen Sie (2004) nicht. 


Dl 75 
D19D 
D1C5 
Dl ED 
D215 
D23D 
D265 
D28D 
D2B5 
D2DD 
D305 
D32D 
D355 
D37D 
D3A5 
D3CD 

Bild 19.4 Tänzer, Position 3 
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A19.2.6 Stellen Sie TBPOS3 auf und dazu POS3. 

Nach diesen Vorbereitungen starten wir den ersten großen Probelauf. 
Weil die Bilder hundertfach zu schnell gezeigt werden würden, benöti¬ 
gen wir eine Verzögerungsroutine und nehmen auch dazu das EBS zu 
Hilfe: 


P19.2. 

7 






PAUSE 

2041 

LD 

A, 20 

3E 

20 



2043 

CALL 

WARTEN 

CD 

B8 

AF 


2046 

RET 


C9 



TEST 

2047 

CALL 

P0S1 

CD 

29 

20 


204A 

CALL 

POS 2 

CD 

31 

20 


204D 

CALL 

P0S3 

CD 

39 

20 


2050 

CALL 

P0S2 

CD 

31 

20 


2053 

JR 

TEST 

18 

F2 


Dami t 

all es 

korrekt abläuft, 

sind folgende 

rungen nötig 

*• 






2003 

JP 

TEST 

C3 

47 

20 


2025 

CALL 

PAUSE 

CD 

41 

20 
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2030 

RET 

09 

2038 

RET 

09 

2040 

RET 

09 

Prüf summe (2000 ... 2054) 

* 2469 


19.3 Tanz und Musik 

Wir fügen jetzt noch Bild und Ton zusammen. Teilaufgaben: 

1. Notentabelle bereitstellen. 

2. Ablauftempo mit XTEMP bestimmen. Dadurch wird PAUSE über¬ 
flüssig. 

3. Bild und Ton nach unserer Melodie koordinieren. 


F'l9. 3-1 (Prüf summe 045F) 


TABTON 1600 
16CC 
16D8 


23 44 33 OD 46 33 OD OD 23 46 
23 47 33 OD 23 41 33 OD 42 33 
52 33 OD OD 


33 OD 
OD OD 


FT 9.3« 2 (F' r üf su mmen am r echt en Ra nd ) 


START 2000 

CALL 

CL.S 

CD 

9F 

AF 

2003 

JP 

TNZMUS 

C3 

41 

20 

2025 

CALL 

MELDY 

CD 

30 

00 

TNZMUS 2041 

L.D 

A, 04 

3E 

04 


2043 

CALL 

XTEMP 

CD 

41 

00 

L.AB2 2046 

L.D 

DE, TQN+A 

1 1 

DO 

16 

2049 

CALL 

PCS 1 

CD 

29 

20 

2040 

LD 

DE,TONR 

1 1 

D8 

16 

204F 

CALL 

F’0S2 

CD 

31 

20 

2052 

LD 

DE,TON+A 

1 1 

DO 

16 

2055 

CALL 

POS 3 

CD 

39 

20 

2058 

LD 

DE„TONR 

1 1 

D8 

16 

205B 

CALL 

P0S2 

CD 

31 

20 

2 OSE 

LD 

DE,TONA 

1 1 

DO 

16 

2061 

CALL 

P0S1 

CD 

29 

20 

2064 

LD 

DE,TONE 

1 1 

D4 

16 

2067 

CALL 

POS 2 

CD 

31 

20 

206A 

LD 

DE,TON+A 

11 

DO 

16 

206D 

CALL 

POS 3 

CD 

39 

20 

2070 

LD 

DE,TONR 

11 

D8 

16 
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2073 

CALL 

P0S2 

CD 

31 

20 

2076 

LD 

DE,TGN+G 

11 

CC 

16 

2079 

CALL 

POS 1 

CD 

29 

20 

207C 

LD 

DE,TONR 

11 

D8 

16 

207F 

CALL 

R0S2 

CD 

31 

20 

2082 

LD 

DE,TON+G 

11 

c;c 

16 

2085 

CALL 

P083 

CD 

39 

20 

2088 

LD 

DE,TGNR 

11 

D8 

16 

208B 

CALL 

PÜS2 

CD 

31 

20 

208E 

LD 

DE,TON+G 

11 

CC 

16 

2091 

CALL 

POS1 

CD 

29 

20 

2094 

LD 

DE,TON+A 

11 

D0 

16 

2097 

CALL 

PGS2 

CD 

31 

20 

209A 

LD 

DE,TON+G 

11 

CC 

16 

209D 

CALL 

PÜS3 

CD 

39 

20 

20AO 

LD 

DE,TONR 

11 

D8 

16 

20 A3 

CALL 

POS 2 

CD 

31 

20 

20A6 

JR 

LAB2 

18 

9E 



Es sei dem Leser überlassen, das Programm weiter zu vervollständigen. 


19.4 Wir relokatieren Tanz und Musik 

Abgesehen von einer eventuellen Vervollständigung weist PI9.3. 
zwei Mängel auf: 

1. Es läßt zwischen 16DB und 2000 fast 3 KB Speicherraum unbenutzt. 
Das ist nicht schlimm, denn Speicherraum haben wir genug. Unange¬ 
nehmer ist schon, daß man zum Saven mehr Band benötigt und deswe¬ 
gen das Laden unnötig lange dauert. 

2. Es werden nur 6 Bytes des EBS benutzt; dafür sollte man nicht 
zweimal laden müssen. 

Zu 2: Wir ändern den Programmanfang ab zu 

START 1FFE LD A,16 3E 16 

2000 CALL PRNT CD 12 00 

Al9.4.1 a) Schieben Sie das Programm an seine Daten heran, 

1FFE...20A7 nach 16DC... 

b) Erledigen Sie auch die innere Anpassung! 
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Das Video-RAM des MZ-700 reicht von D000 bis DFFF, letztlich 
unterteilt in vier Bereiche: 


D000...D3E7 

D3E8...D7FF 
D800...DBE7 
DBE8 ... DFFF 
Codierung: 


ist sichtbar und enthält eingespeicherte Bildschirm- 
codes; 

unsichtbar, Bildschirmcodes; 

Farbinformation für sichtbaren Bereich; 
Farbinformation für unsichtbaren Bereich. 

Schwarz: 0 Grün: 4 

Blau: 1 Hellblau: 5 

Rot: 2 Gelb: 6 

Purpur: 3 Weiß: 7 


Die 64 möglichen zweistelligen Farbcodierungen (der zweite Zeichen¬ 
satz bleibt unberührt) setzen sich aus diesen acht Ziffern zusammen; 
das MSN bestimmt die Farbe des dargestellten Zeichens, das LSN die 
Hintergrundfarbe. 


20.1 Farbgebung - Zufallsfarben 

Der normalen Farbgebung entspricht der Farbcode 71; Sie könne" das 
mit DD800 sehr bequem nachprüfen. Sie können aber auch mit MD800 
(oder MD850) andere Farbcodes eingeben. Sie sehen dann sofort die 
Auswirkung - sofern Sie einen Farbmonitor oder einen Farbfernseher 
besitzen. Das regt zum Improvisieren an: Auf dem Bildschirm sollen 
von Zufallszahlen gesteuerte Farbmuster entstehen. Grobaufbau: 

1. Uhr stellen mit TIMST. 

2. L aus E005 laden. 

3. Kurze Verzögerung. 



150 


Bildschirm und Farbe 


4. E005 auslesen, auf Werte D8... DF maskieren und nach H laden. 

5. Kurze Verzögerung. 

6. E005 auslesen und auf 77 begrenzen. 

7. Indirekt in Farb-RAM speichern. 

8. Kurze Verzögerung. 

9. Rücksprung nach 2. 


P20.1.1 (Pr üf summe: 11 D5) 


RNDCOL 

2000 

XÜR 

A 

AF 



ii. 


2001 

LD 

DE,1111 

11 

1 1 

11 



2004 

CALL 

TIMST 

CD 

33 

00 


LABEL 

2007 

LD 

A,(E005) 

3A 

05 

E 0 

. 2 ii 


200 A 

LD 

L, A 

6 F 





200B 

LD 

B, FF 

06 

FF 


5 • 

LI 

200D 

DJNZ 

H 

10 

FE 




200 F 

LD 

A,(E005) 

3A 

05 

E 0 

54. 


2012 

AND 

07 

E 6 

07 




2014 

OR 

DS 

F 6 

D 8 




2016 

L.D 

H, A 

67 





2017 

LD 

B, FF 

06 

FF 


. 5 m 

L 2 

2019 

DJNZ 

L.2 

10 

FE 




201 B 

LD 

A, (E005 > 

3A 

05 

E 0 

; 6 . 


201 E 

AND 

77 

E 6 

77 




2020 

LD 

(HL),A 

77 



?7. 


2021 

LD 

B, FF 

06 

FF 


5 8 . 

L3 

2023 

DJNZ 

L3 

10 

FE 




2025 

JR 

LABEL 

18 

E 0 




Ersetzen Sie versuchsweise in Zeile 200B LD B,FF durch LD B,A und 
NOP. Veränderung? Begründung? 


20.2 Simulation einer Verkehrsampel 

Wir wollen jetzt auf dem Bildschirm eine Verkehrsampel in der richti¬ 
gen Reihenfolge rot, rot/gelb, grün, gelb, rot usw. blinken lassen. Wir 
löschen dazu den Bildschirm und erzeugen als Untergrund bzw. Rah¬ 
men auf dem blauen Schirm ein 4 ★ 7 Felder großes Rechteck, in dem 
die drei Lampen untergebracht werden sollen. Erster Schritt: 
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3000 

CALL 

CLS 

CD 

9F 

AF 

3003 

LD 

HL,D826 

21 

62 

DB 

3006 

LD 

(HL),OO 

36 

00 


3008 

INC 

HL 




3009 

L.D 

(HL.) , OO 

36 

00 


300B 

INC 

HL 

OT 



30OC 

LD 

(HL),00 

36 

00 


30OE 

HALT 


76 




Hiermit erhalten wir drei ncbeneinanderliegende schwarze Felder. Wir 
benötigen das sechs weitere Male darunter und erzielen dies, indem wir 
einen geeigneten Speicherbereich sechsmal über sich selbst hinweg 
kopieren.: 

P20.2.2 



300E 

LD 

B, 06 

06 

06 


LABO 

30 1 0 

PUSH 

BC 

C5 




3011 

LD 

HL,D85Ö 

21 

58 

D8 


3014 

LD 

DE,D880 

1 1 

80 

D8 


3017 

LD 

BC,0118 

01 

18 

Ol ;7*40d=U8h 


301A 

L.D IR 


ED 

BO 



30 IC 

POP 

BC 

CI 




30 ID 

DJNZ 

LABO 

10 

Fl 



301F 

HALT 


76 




Sodann benötigen wir eine Routine, die alle drei Lampen löscht, damit 
wir nicht einmal diese und einmal jene zu löschen brauchen: 


P20.2.3 


3022 

XOR 

A 

AF 



;schwarz 

3023 

LD 

(D88B),A 

32 

8B 

D8 

5 r t 

Lampe 

3026 

LD 

(D8DB) , A 

TO 

Oi. 

DB 

D8 

; ge 

Lampe 

3029 

LD 

(D92B),A 

32 

2B 

D9 

; gr 

Lampe 

302C 

RET 


C9 






Nun müssen wir uns Gedanken über die Laufzeit machen. WARTEN 
liefert etwa folgende Verzögerungen: 

A = SO 60 70 80 90 A0 BO CO DO E0 F0 

1,5 2 3 4 5 7 10 13 16 20 25 s 
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Für unsere Ampelsimulation wählen wir folgende Zeiten: 


Rot: 

9 s 

entspr. 

A = AB 


Rot/Gelb 

1,5 s entspr. 

A = 50 


Grün: 

6 s 

entspr. 

A = 98 


Gelb: 

3 s 

entspr. 

A = 70 


Damit ergeben sich folgende Farbroutinen: 




P20.2.4 






ROT 302D 

LD 

A, 22 

3E 

22 


302F 

LD 

(D88B),A 

32 

8B 

D8 

3032 

LD 

A, AB 

3E 

AB 


3034 

CALL 

WARTEN 

CD 

B8 

AF 

3037 

RET 


C9 



ROTG 3038 

LD 

A, 22 

3E 

22 


303A 

LD 

(D88B), A 

TO 

8B 

D8 

303D 

L.D 

A, 66 

3E 

66 


303F 

L.D 

(D8DB),A 

“TD 

DB 

D8 

3042 

LD 

A, 50 

3E 

50 


3044 

CALL 

WARTEN 

CD 

B8 

AF 

3047 

RET 


C9 



GRUE 3048 

LD 

A, 44 

3E 

44 


304A 

LD 

(D92B),A 

32 

2B 

D9 

304D 

LD 

A, 90 

3E 

90 


304F 

CALL 

WARTEN 

CD 

B8 

AF 

3052 

RET 


C9 



GELB 3053 

LD 

A, 66 

3E 

66 


3055 

L.D 

(DFJDB) , A 

32 

DB 

D8 

3058 

LD 

A, 70 

3E 

70 


305A 

CALL 

WARTEN 

CD 

B8 

AF 

305D 

RET 


C9 



Danach fehlt nur noch das Hauptprogramm: 




R20.2.5 






AMPEL 305E 

CALL 

AUS 

CD 

22 

30 

3061 

CALL 

ROT 

CD 

2D 

30 

3064 

CALL 

AUS 

CD 

22 

30 

3067 

CALL 

ROTG 

CD 

38 

30 

306A 

CALL 

AUS 

CD 

22 

30 

306D 

CALL 

GRUE 

CD 

48 

30 

3070 

CALL 

AUS 

CD 

22 

30 

3073 

CALL 

GELB 

CD 

53 

30 

3076 

JR 

AMPEL 

18 

E6 
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Und es ist einzufügen 

301F JR AMPEL 18 3D 

3021 NOP 00 

Prüfsumme (3000 .„- 3077) = 35E8 

Das Programm weist noch drei Mängel auf: 

1. Nicht alle AUS-Aufrufe sind nötig. 

2. Jede Farbroutine endet mit WARTEN, RET. Ließe sich das sparsamer 
einbauen? 

3. Könnte man WARTEN in die AUS-Routine einbauen? 

4. Stimmt der schwarze Rahmen der Ampel? 

Es sei dem Leser überlassen, Vereinfachungen und Korrekturen anzu¬ 
bringen. 

Eine Ampel steht selten allein. Das Problem wird etwas komplizier¬ 
ter, wenn man auch die “unsere Straße» kreuzende Querstraße mit 
einbezieht und beide Ampeln möglichst differenziert aufeinander 
abstimmt. Daher ergeht an den Leser die Anregung, nebeneinander 
zwei korrespondierende Ampeln auf dem Bildschirm erscheinen zu 
lassen. 
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t=il=il=il=il=iL=il=ll=il=lbr=ll=i i=ii=i*=l»=l»=li=l*=l 

B i. 3. d ( f a b t) a h n e W o r t e 

rot 1_1 1_1 

gelb „J‘l.1""1_l‘i_.1 1_ 

grün _1 1..1.1_ 

rot __1 1_1 1 __ 

gelb “’l._._fl_1""1_1“L_ 


grün 


.1 


.1 


^>=^»=i«=i‘==it=i‘=i t==»>=»»= i i»= ; > ti ==» l ==» l =< l =» l =» >ai!! i |s =i 
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Da nicht alle Leser über einen Drucker verfügen werden, wollen wir 
diesen Abschnitt kurz halten. Zudem muß die Einschränkung gemacht 
werden, daß der Verfasser mit seinem MZ-700 einen EPSON MX 80 
über ein Voigt-Interface betreibt. Dennoch darf davon ausgegangen 
werden, daß das Gesagte auch für den Printerplotter des MZ-731 gilt. 


21.1 Die Monitorroutine PMSG 

Wie das Sharp-Handbuch auf Seite 149 beschreibt, genügt zum Anspre- 
chen des Druckers bereits der P-Befehl: Gibt man z. B. "PMUEN 
CHEN" ein, druckt der Printer «MUENCHEN» aus. 

Wir betreiben nun wieder Fährtensuche im Assemblerlisting des 
Monitors: Bei 00D5 finden wir den Buchstaben P. Von dort wird mit der 
Sprungweite 7C nach 0155 verwiesen. Wir nehmen an, daß dem P kein 
folgt. Dann geht es bei PTST1 in 0170 weiter. Dort wird PMSG in 
01A5 aufgerufen, was doch wohl printer message bedeutet. Wir finden 
auf page 05 in Zeile 59 den Hinweis, daß die Datenadresse in DE steht 
und die Botschaft mit 0D endet. Das vollziehen wir nach: 

P21.1-1 

1400 4D 5A 2D 37 30 30 20 4F 4B 0D 

4000 LD DE,1400 11 00 14 

4003 CALL PMSG CD A5 01 

4006 RST 00 C7 

Eventuell muß in die Botschaft noch 10, der Code für «line feed» 
eingefügt werden. Wenn Sie nicht vergessen haben, Ihren Drucker 
einzuschalten, müßte eigentlich alles nach Wunsch verlaufen. Das regt 
uns zu einer «ernsthaften» Anwendung an. 
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21.2 Wir drucken einen Speicherauszug 

Zunächst eine Vorübung. Von 0124 an sollen mit Adresse am linken 
Rand 16 Bytes ausgegeben werden. (Je nach Drucker müßte diese 
Anzahl evtl, begrenzt werden.) Zum Aufbau der codierten Botschaft 
wählen wir in unserem Arbeitsbereich eine Stelle, die wir kaum mit 
anderen Daten belegen werden: 1300... Als Pointer hierin benutzen 
wir das IX-Register, zum Holen der Daten HL. 

Die Subroutine SPC fügt jeweils ein codiertes space in den aufzubau¬ 
enden String ein. Ihren Hauptteil ab 2004 benutzen wir auch zum 
Anreihen der Datencodes. 

Die Subroutine UMWSP wandelt die Daten aus dem Hexadezimalfor¬ 
mat ins ASCII-Format um und fügt sie an. 

Im Hauptprogramm PDUMP2 geschieht folgendes: 

1. Zuerst werden HL und IX auf ihre Anfangswerte gesetzt. 

2. ADDH und ADDL werden umgewandelt und angefügt. 

3. Es folgt ein space. 

4. B wird auf 10h gesetzt für 16 Speicherstellen. 

5. (HL) wird geholt, umgewandelt und angefügt. Es folgt ein space, und 
HL wird um 1 erhöht. 

6. Wenn noch nicht 16mal gelesen, zurück nach 5. 

7. Ein (CR) wird angehängt. Benötigt Ihr Drucker noch ein (LF) (10h)? 

8. Aufruf von PMSG und restart. 


P21.2-1 (Prüf summe s 1B6A) 


PDUMF'V 

2000 

JR 

PDUMP2 

IQ 

ID 


SPC 

2002 

LD 

A, 20 

3E 

20 


SPC 2 

2004 

LD 

(IX +00),A 

DD 

77 

00 


2007 

INC 

IX 

DD 

23 



2009 

RET 


C9 



UMWSP 

20OA 

PUSH 

AF 

F5 




200B 

SRL 

A 

CB 

3F 



200D 

SRL 

A 

CB 

3F 



2O0F 

SRL 

A 

CB 

3F 



2011 

SRL 

A 

CB 

3F 



2013 

CALL 

ASC 

CD 

DA 

03 


2016 

CALL 

SPC2 

CD 

04 

20 


2019 

PGP 

AF 

Fl 




201A 

CALL 

ASC 

CD 

DA 

03 


20 ID 

JR 

SPC2 

18 

E5 
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PDUMP2 201F 

LD 

HL,0124 

21 

24 

01 

2022 

L.D 

IX,1300 

DD 

21 

00 

2026 

LD 

A,H 

7C 



2027 

CALL 

UMWSP 

CD 

0A 

20 

202A 

L.D 

A, L 

7D 



202B 

CALL 

UMWSP 

CD 

0A 

20 

202E 

CALL 

SPC 

CD 

02 

20 

2031 

LD 

B, 10 

06 

10 


LOOP 2033 

LD 

A,(HL) 

7E 



2034 

CALL 

UMWSP 

CD 

0A 

20 

2037 

CALL 

SPC 

CD 

02 

20 

203A 

INC 

HL 

23 



203B 

DJNZ 

LOOP 

10 

-0 

Ul 


203D 

L.D 

A, 0D 

3E 

0D 


203F 

CALL 

SPC2 

CD 

04 

20 

2042 

LD 

DE,1300 

1 1 

00 

13 

2045 

CALL 

F'MSG 

CD 

A5 

01 

2048 

RST 

00 

C7 




Nach diesem erfolgreichen Vortest gehen wir nun an die Gestaltung des 
vollständigen Programms, wobei wir 2000...20IE übernehmen. 
Anfangs- und Endadresse des gewünschten Hexdumps und die Anzahl 
der Daten je Zeile übergeben wir dem Programm in unserem Arbeitsbe¬ 
reich 1200... 1204: 


1200 BL BH VL VH PZ 


Darin bedeuten 

VH: Von-Adresse MSB VL: Von-Adresse LSB 

BH: Bis-Adresse MSB BL: Bis-Adresse LSB 

PZ: Daten je Zeile 

Grobstruktur: 

1. Wir holen mit Hilfe von IX die Von-Adresse nach HL, die Bis- 
Adresse nach DE und die Anzahl der Bytes je Zeile nach 2045. 

2. Den Zeilenanfang gestalten wir wie in P21.2.1 

3. Den Aufbau der eigentlichen Druckzeile verlegen wir in eine 
Schleife, die mit LD B,PZ begrenzt wird (Zeile 026). 

4. Nachdem ein Byte geholt, umgewandelt und angefügt wurde, 

5. werden HL und DE auf den Stapel gerettet, vertauscht und sub¬ 
trahiert. 
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6. Wurde die Differenz negativ, so haben wir das abgesteckte Intervall 
überschritten und verlassen die Schleife. 

7. Anderenfalls werden DE und HL wieder auf die benötigten Zwi¬ 
schenwerte gesetzt und die Schleife fortgesetzt, wenn die Zeile noch 
nicht voll ist. 

8. Am Ende der Zeile wird (CR) angehängt und DE gerettet. 

9. DE zeigt auf Anfang Botschaft. Drucken. 

10. DE wiederherstellen und zurück zu neuer Zeile. 

11. Zum Abschluß (CR) anfügen und drucken. Restart. Auf den 
schlampigen Schluß wird ausdrücklich aufmerksam gemacht: In 2029 
und 202A werden HL und DE gepushet. Wir verzichten auf eine kor¬ 
rekte Restaurierung des Stapels, weil durch RST 00 das System ohnehin 
neu initialisiert wird. 

Es versteht sich von selbst, daß die neuen Programme und Routinen nur 
dann richtig ablaufen, wenn das jeweils bisherige EBS geladen ist. 


P21. 

2.2 

(Prüfsummes 

54B0) 



015 

2000 

11 

92 

20 


PDUMP: 

LD 

DE,TPDUMP 

016 

2003 

CD 

ED 

AF 



CALL 

MSGNL 

017 

2006 

CD 

46 

20 



CALL 

PDEIN 

018 

2009 

2A 

02 

12 


SETREG: 

LD 

HL,(VGN) 

019 

200C 

ED 

SB 

00 

12 


LD 

DE,(BIS) 

020 

2010 

DD 

21 

00 

13 

LZEILE: 

LD 

IX,1300H 

021 

2014 

7C 





LD 

A, H 

022 

2015 

CD 

68 

20 



CALL 

UMWANH 

023 

2018 

7D 





LD 

A, L 

024 

2019 

CD 

68 

20 



CALL 

UMWANH 

025 

20 IC 

CD 

8A 

20 



CALL 

SPCANH 

026 

201F 

06 

10 



LB/Zs 

LD 

B, 10H 

027 

2021 

7E 




BYTANH: 

LD 

A, (HL) 

028 

2022 

CD 

68 

20 



CALL 

UMWANH 

029 

2025 

CD 

8A 

20 



CALL 

SPCANH 

030 

2028 

23 





INC 

HL 

031 

2029 

E5 





PUSH 

HL 

032 

202A 

D5 





PUSH 

DE 

033 

202B 

A7 





AND 

A 

034 

202C 

EB 





EX 

DE, HL 

035 

202D 

ED 

52 




SBC 

HL, DE 

036 

202F 

FA 

42 

20 



JP 

M, PDENDE 

037 

2032 

Dl 





PGP 

DE 

038 

2033 

El 





PGP 

HL 
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039 

2034 

10 

EB 



DJNZ 

BYTANH 

040 

2036 

3E 

0D 



LD 

A, ODH 

041 

2038 

CD 

8C 

20 


CALL 

SPC2 

042 

203B 

D5 




PUSH 

DE 

043 

203C 

CD 

7E 

20 


CALL 

ENDEZL 

044 

203F 

Dl 




POP 

DE 

045 

2040 

18 

CE 



JR 

LZEILE 

046 

2042 




5 



047 

2042 

CD 

7E 

20 

F'DENDE: 

CALL 

ENDEZL 

048 

2045 

C7 




RST 

00 

049 

2046 




; 



050 

2046 

11 

29 

AE 

PDEIN: 

L.D 

DE,TVQN 

051 

2049 

CD 

15 

00 


CALL 

MSG 

052 

204C 

21 

03 

12 


LD 

HL, VQN+Ol 

053 

204F 

CD 

4C 

AF 


CALL 

IN4HEX 

054 

2052 

11 

2E 

AE 


LD 

DE,TBIS 

055 

2055 

CD 

15 

00 


CALL 

MSG 

056 

2058 

CD 

4C 

AF 


CALL 

IN4HEX 

057 

205B 

1 1 

AA 

20 


LD 

DE,TBYT/Z 

058 

205E 

CD 

15 

00 


CALL 

MSG 

059 

2061 

CD 

57 

AF 


CALL 

INBYTE 

060 

2064 

32 

20 

20 


LD 

(LB/Z+Ol) 

061 

2067 

C9 




RET 


062 

2068 




fl 



063 

2068 

F5 



UMWANH: 

PUSH 

AF 

064 

2069 

CB 

3F 



SRL. 

A 

065 

206B 

CB 

3F 



SRL 

A 

066 

206D 

CB 

3F 



SRL 

A 

067 

206F 

CB 

3F 



SRL 

A 

068 

2071 

CD 

DA 

03 


CALI- 

ABC 

069 

2074 

CD 

8C 

20 


CALL 

SPC2 

070 

2077 

Fl 




POP 

AF 

071 

2078 

CD 

DA 

03 


CALL 

ASC 

072 

207B 

C3 

0C 

20 


JP 

SPC2 

073 

207E 




«1 



074 

207E 

3E 

OD 


ENDE-ZL: 

LD 

A, ODH 

075 

2080 

CD 

8C 

20 


CALL 

SPC2 

076 

2083 

1 1 

00 

13 


LD 

DE,1300H 

077 

2086 

CD 

A5 

01 


CALL 

F’MSG 

078 

2089 

C9 




RET 


079 

208A 




!• 



080 

208A 

3E 

20 


SF'CANH s 

LD 

A, 20H 

081 

20 SC 

DD 

77 

00 


LD 

<IX+OO),A 

082 

208F 

DD 

O'T 



I NC 

IX 

083 

2091 

C9 




RET 


084 

2092 




5 
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085 2092 16 TF'DUMP: DEFB 16H 

086 2093 53 9E 92. Aö DEFM 51 Spei eherauszug’ 

087 2097 9F 98 92 9D 

088 209B Al A5 A4 A2 

089 209F A5 97 

090 20A1 20 9C 9D A5 DEFM 7 drucken 7 

091 20A5 9F A9 92 B0 ' 

092 20A9 0D DEFB 0DH 

093 20AA 20 42 BD 96 TBYT/Zs DEFM 7 Bytes je Zeile 7 

094 20AE 92 A4 20 AF 

095 20B2 92 20 5A 92 

096 20B6 A6 B8 92 20 

097 20BA 0D DEFB 0DH 

098 20BB 5 

099 20BB END 
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Vier Utilities fürs EBS 


22.1 VERSCH verschiebt Speicherblöcke 

P21.2.2 ist sehr nützlich und soll ins EBS aufgenommen werden. Ein 
Umschreiben von Hand ist bei 186 Bytes kein Vergnügen, und für jede 
Verschiebung einen Blocktransfer hinschreiben zu müssen, ist auf die 
Dauer auch nicht anregend. Deshalb konzipieren wir eine Routine, die 
das ein für allemal erledigt. Wir legen dazu im Arbeitsbereich folgende 
Adressen fest: 

1200 NL NH BL BH VL VH 

Das ist so zu lesen: Der zu verschiebende Block reicht VON (VH,VL) 
BIS (BH,BL), und sein Anfang soll NACH (NH,NL) verschoben werden. 

Zu einzelnen Programmabschnitten: 

ANZAHL ermittelt die Anzahl der zu verschiebenden Bytes durch 
Subtraktion BIS - VON mit nachfolgendem INC HL. 

V/R? prüft durch Subtraktion NACH - VON, ob vorwärts (in Pro¬ 
grammablaufrichtung) oder rückwärts zu verschieben ist. 


F’22.1.1 < Pr ü-f summe: 31 1D) 


15 

3000 

1 1 

56 

30 

VERSCHs 

LD 

DE,TVERS 

16 

3003 

CD 

15 

00 


CALL 

MSG 

17 

3006 

CD 

06 

00 

VERS2: 

CALL 

LETNL 

18 

3009 

1 1 

29 

AE 


LD 

DE,TVON 

19 

300C 

CD 

15 

00 


CALL 

MSG 

20 

30 OF 

21 

05 

12 


LD 

HL,VON+Ol 

21 

3012 

CD 

4C 

AF 


CALL 

IN4HEX 

22 

3015 

11 

2E 

AE 


LD 

DE,TBIS 

23 

3018 

CD 

15 

00 


CALL 

MSG 

24 

301B 

CD 

4C 

AF 


CALL 

IN4HEX 

25 

30 IE 

1 1 

72 

30 


LD 

DE,TNACH 
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26 

3021 

CD 

15 

00 



CALL 

MSG 

27 

3024 

CD 

4C 

AF 



CALL 

IN4HEX 

28 

3027 

A7 




ANZAHL: 

AND 

A 

29 

3028 

2A 

02 

12 



L.D 

HL,(BIS) 

30 

302B 

ED 

5B 

04 

12 


LD 

DE,(VON) 

31 

302F 

ED 

52 




SBC 

HL, DE 

32 

3031 

23 





INC 

HL 

33 

3032 

E5 





PUSH 

HL 

34 

3033 

CI 





POP 

BC 

35 

3034 

A7 




V/R?: 

AND 

A 

36 

3035 

2A 

00 

12 



LD 

HL,(NACH) 

37 

3038 

ED 

52 




SBC 

HL, DE 

38 

303A 

FA 

4B 

30 



JP 

M,RUECK 

39 

303D 

2A 

00 

12 


VOR'W: 

LD 

HL,(NACH) 

40 

3040 

09 





ADD 

HL, BC 

41 

3041 

2B 





DEC 

HL 

42 

3042 

E5 





PUSH 

HL 

43 

3043 

Dl 





POP 

DE 

44 

3044 

2A 

02 

12 



LD 

HL,(BIS) 

45 

3047 

ED 

B8 




LDDR 


46 

3049 

18 

BB 




JR 

VERS2 

47 

304B 





5 



48 

304B 

2A 

04 

12 



LD 

HL,(VON) 

49 

304E 

ED 

5B 

00 

12 


LD 

DE,(NACH) 

50 

3052 

ED 

B0 




LDIR 


51 

3054 

18 

B0 




JR 

VERS2 

52 

3056 





5 



53 

3056 

16 




TVERSs 

DEFB 

16H 

54 

3057 

53 

9E 

92 

A6 


DEFM 

7 Spei eher 

55 

305B 

9F 

98 

92 

9D 




56 

305F 

9A 

B8 






57 

3061 

BA 





DEFB 

BAH 

58 

3062 

9F 

A9 

92 

20 


DEFM 

J cke ver' 

59 

3066 

AB 

92 

9D 

A4 




60 

306A 

9F 

98 

A6 

92 




61 

306E 

9A 

92 

B0 





62 

3071 

0D 





DEFB 

0DH 

63 

3072 

20 

B0 

Al 

9F 

TNACH: 

DEFM 

7 nach 7 

64 

3076 

98 

20 






65 

3078 

0D 





DEFB 

0DH 

66 

3079 





5 



67 

3079 






END 



A22.1.2 a) Schieben Sie PDUMP vor das bisherige EBS. al) Innere 
Anpassung? 

b) Machen Sie dasselbe mit VERSCH. 
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22.2 VERIFY zum Überprüfen von Speicherblöcken 

Wir verfassen nun ein Programm, das es gestattet, Speicherinhalte - 
dazu gehören auch Programme - mit einigem Komfort mit der Vorlage 
zu vergleichen. Das kann vor allem bei der Kontrolle neu eingetippter 
längerer Programme hilfreich sein. 

Zuerst wird die Adresse eingegeben, von der an man kontrollieren 
will, dann der Prüfsummenstand, mit dem man beginnen will; wird im 
allgemeinen 0000 sein. 

VERIFY gibt dann die Adresse der momentan angesprochenen Spei¬ 
cherstelle und deren Inhalt aus. Man hat nun drei Antwortmöglich¬ 
keiten: 

(CR) bedeutet, daß der angezeigte Speicherinhalt akzeptiert wird. 
Danach Ausgabe der Prüfsumme bis zu dieser Speicherstelle und neue 
Zeile. 

"K" bedeutet ..Korrektur». Man kann nun den gewünschten neuen 
Inhalt eingeben. Danach weiter wie bei CR. 

"R" kann man eingeben, wenn man in der Kontrolle um (je) einen 
Schritt zurückgreifen möchte. 

Wir verlegen das Programm gleich an seinen endgültigen Platz. 


F'22.2.1 (Prüfsummen am rechten Rand) 


oo 

ABD7 

1162AC 

VERIFY: 

LD 

DE, TVERFY 

; 011F 

23 

AB DA 

CD1500 


CALL 

MSG 


24 

AB DD 

210312 


L.D 

HL,VON+01 


oc; 

wJ 

ABE0 

CD4CAF 


GAL.L 

IN4HEX 


26 

ABE3 

CD0600 


CALL 

LETNL 

; 04D2 

27 

ABE6 

1170AG 


LD 

DE,TPRF 


28 

ABE9 

CD1500 


CALL 

MSG 


29 

ABEC 

CD4CAF 


CALL- 

IN4HEX 


30 

ABEF 

GD0600 

L..GÜP: 

CALL 

LETNL 


31 

ABF2 

CDF7AB 


CALL 

ZEILBG 

; 0BEB 

TO 

ABF5 

1BF8 


JR 

LOOP 


33 

ABF7 

210312 

ZEILBG: 

L_D 

HL,VON+01 


34 

ABFA 

CD25AF 


CALL 

QUT4HX 


35 

ABFD 

CD0G00 


CALL 

PRINTS 


36 

AC00 

2A0212 


LD 

HL,(VON) 

; 0FE9 

37 

AG 03 

7E 


LD 

A, (HL) 


38 

AC04 

CD30AF 


CALL 

OUTBYT 


39 

AC07 

CD0G00 


CALL 

PRINTS 
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40 

ACOA 

CDB309 

LZEILOs CALL 

??KEY 


41 

ACOD 

F5 

PUSH 

AF 

; 156A 

42 

ACOE 

CDCEOB 

CALL 

7DACN 


43 

AC11 

CD1200 

CALL 

PRNT 


44 

AC14 

CDOCOO 

CALL 

PRINTS 


45 

AC17 

Fl 

POP 

AF 

5 19B9 

46 

AC18 

FECD 

CP 

CDH 

; < CR > 

47 

AC1A 

280A 

JR 

Z,VRFWTR 


48 

ACIC 

FE 12 

CP 

12H 

5 *R’ 

49 

AC1E 

2824 

JR 

Z,VRFRCK 


50 

AC20 

FEOB 

CP 

OBH 

; ? K 9 

51 

AC22 

2835 

JR 

Z,VFKORR 

5 1E78 

52 

AC24 

18E4 

JR 

LZEILO 


53 

AC26 

5E 

VRFWTR: LD 

E,(HL) 


54 

AC27 

1600 

L.D 

D, 00 


55 

AC29 

DD2A0012 

LD 

IX,(SUMME) 


56 

AC2D 

DD 19 

ADD 

IX „DE 

; 21F7 

57 

AC2F 

DD220012 

LD 

(SUMME),IX 


58 

AC33 

23 

INC 

HL 


59 

AC34 

220212 

LD 

(VON),HL 


60 

AC37 

3A0112 

LD 

A,(SUMME+01) 


61 

AC3A 

CD30AF 

CALL 

OUTBYT 

; 255A 

62 

AC3D 

3A0012 

LD 

A,(SUMME) 


63 

AC4Ö 

CD30AF 

CALL 

OUTBYT 


64 

AC43 

C9 

RET 



65 

AC44 

2B 

VRFRCK: DEC 

HL 


66 

AC45 

220212 

LD 

(VON)„HL 

; 287C 

67 

AC48 

5E 

LD 

E, (HL) 


68 

AC49 

1600 

LD 

D, OO 


69 

AC4B 

2A0012 

LD 

HL,(SUMME) 


70 

AC4E 

A7 

AND 

A 


71 

AC4F 

ED52 

SBC 

HL, DE 

; 2B12 

72 

AC51 

220012 

LD 

(SUMME),HL 


73 

AC54 

CD0600 

CALL 

LETNL 


74 

AC57 

1S9E 

JR 

ZEILBG 


75 

AC59 

CD57AF 

VFKORRs CALL 

INBYTE 


76 

AC5C 

77 

LD 

(HL),A 

; 2F19 

77 

AC5D 

CDOCOO 

CALL 

PRINTS 


78 

AC60 

18C4 

JR 

VRFWTR 

; 30CE 

79 

AC62 


5 



80 

AC62 

16 

TVERFY: DEFB 

16H 


81 

AC63 

56455249 

DEFM 

’VERIFY von: 


82 

AC67 

465920AB 




83 

AC6B 

B7B03A20 




84 

AC6F 

OD 

DEFB 

ODH 

; 3552 

85 

AC70 

509D 

TPRF: DEFM 

•’ Pr ’ 
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86 AC72 AD 

87 AG73 AAA4A5B3 

88 AC77 B3923A20 

89 AC7B OD 

90 AC7C 

91 AC7C 


DEFB ADH 
DEFM f summe s ? 

DEFB 0DH ;3B3E 

END 


22.3 OFFSET codiert Sprungweiten 


Im Wörterbuch der Datentechnik finden wir unter «offset»» die Überset¬ 
zung «Rclativzeiger»». Bei der indirekt-indizierten Adressierung (z. B. 
LD A,(IX+03)) kann man die 03 als Offset bezeichnen. Aber auch bei 
den relativen Sprüngen ist das, was wir bisher «Codierung der Sprung¬ 
weite»» nannten, ein Offset zum Inhalt des Programmzählers. Wir 
besprechen absichtlich erst jetzt ein Dienstprogramm für diese recht 
häufige Aufgabe. 

P22.3.1 kommt ohne Arbeitsbereich aus und rechnet nur mit den 
Inhalten der Register: Die VON-Adresse wird nach HL geladen, die 
NACH-Adresse nach DE. HL wird zweimal inkrementiert und damit 
auf den aktuellen Programmzählerstand erhöht. Beide Register werden 
auf den Stapel gerettet, damit man ohne Datenverlust durch Subtrak¬ 
tion feststellen kann, ob ein Vorwärts- oder ein Rückwärtssprung zu 
berechnen ist. Vor der eigentlichen Verzweigung werden die Registerin¬ 
halte mit umgekehrter Zuordnung wiederhergestellt. Bei Rückwärts¬ 
sprung wird gern. Erklärung von 5.2 die NACH-Adresse um 100h 
erhöht. Das geschieht durch Inkrementieren von H. Danach wird das 
Offset ermittelt. Ist danach H 4= 0 oder Bit 7 von L gesetzt, würde der 
beabsichtigte Sprung die zulässige Weite überschreiten: Fehlermel¬ 
dung. 


F'22.3.1 (Prü-fsummen am rechten Rand) 


13 AB47 UAAAB 

14 AB4A CD1500 

15 AB4D CD0600 

16 AB50 1129AE 

17 AB53 CD1500 

18 AB56 CD57AF 

19 AB59 67 


OFFSET: LD DE,TSPR 
CALL MSG 

0FF2: CALL LETNL 

L.D DE, TVON 
CALL MSG 
CALL INBYTE 
LD H, A 


50166 


5 06B8 
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20 AB5A CD57AF 

21 AB5D 6 F 

22 AB5E UEEAC 

23 AB61 CD1500 

24 AB64 CD57AF 

25 AB67 57 

26 AB 68 CD57AF 

27 AB 6 B 5F 

28 AB 6 C 23 

29 AB 6 D 23 

30 AB 6 E E5 

31 AB 6 F D5 

32 AB70 A7 

33 AB71 ED52 

34 AB73 El 

35 AB74 Dl 

36 AB75 FA 88 AB 

37 AB78 280E 

38 AB7A 24 RUECKs 

39 AB7B A7 

40 AB7C ED52 

41 AB7E 7C 

42 AB7F A7 

43 AB80 20ID 

44 AB82 CB7D 

45 AB84 2819 

46 AB 86 180B 

47 AB 88 A7 VORW: 

48 AB89 ED52 

49 AB 8 B 7C 

50 AB 8 C A7 

51 AB 8 D 2010 

52 AB 8 F CB7D 

53 AB91 2O0C 

54 AB93 11C2AB LOFFSs 

55 AB96 CD1500 

56 AB99 7D 

57 AB9A CD30AF 

58 AB9D 18AE 

59 AB9F CD06O0 LZUW: 

60 ABA2 UCCAB 

61 ABAS CD1500 

62 ABA 8 18A3 

63 ABAA 

64 ABAA 16 TSPR: 

65 ABAB 539E9DA5 


CALL INBYTE 

LD L, A 

LD DEMNACH 

CALL MSG ;OBEE 

CALL INBYTE 

LD D, A 

CALL INBYTE 

LD E, A 

INC HL ;106D 

INC HL 

PU 8 H HL 

PUSH DE 

AND A 

SBC HL, DE ; 1430 

POP HL 

POP DE 

JP M,VQRW 

JR Z,VQRW 

INC H 51869 

AND A 

SBC HL,DE 

LD A,H 

AND A 

JR NZ,LZUW ;1BAF 

BIT 7, L 
JR Z,LZUW 
JR LOFFS 
AND A 

SBC HL,DE ;1F41 

LD A, H 
AND A 

JR NZ,LZUW 
BIT 7,L 

JR NZ,LZUW ?2208 

LD DE,TOFFS 
CALL MSG 
LD A, L. 

CALL OUTBYT 

JR QFF2 ;2757 

CALL LETNL. 

LD DE,TZUW 
CALL MSG 

JR 0FF2 5 2B4F 

DEFB 16H 

DEFM 'Sprungweiten' 
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66 ABAF B097A392 

67 ABB3 A69692B0 

68 ABB7 9A929D92 

69 ABBB 9F98B0A5 

70 ABBF B097 

71 ABC1 0D 

72 ABC2 204FAAAA TOFFS 

73 ABC6 A492963A 

74 ABCA 20 

75 ABCB 0D 

76 ABCC A2A520A3 TZUWs 

77 ABD0 92A69621 

78 ABD4 2121 

79 ABD6 0D 

80 ABD7 ; 

81 ABD7 


DEFM 

'berechnung' 


DEFB 

DEFM 

0DH 

’ Offsets ’ 

; 38CD 

DEFB 

DEFM 

0DH 

’zu weit!!!’ 

; 3CC3 

DEFB 

0DH 

; 410B 

END 




22.4 MENUE schafft Überblick 

Wir haben nun schon eine ganze Reihe von Utilities aufgestellt, und es 
erscheint sinnvoll, diese übersichtlich anzuordnen. Hierzu dient 
P22.4.1, das uns diese Übersicht auf den Bildschirm schreibt: 


1. Disassembler 

2. Offsetberechnung 

3. Prüf summe 

4. Speicherauszug drucken 

5. Um wandeln DEZ —» HEX 

6. Umwandeln HEX —» DEZ 

7. Verschieben 

8. Verify 

9. Monitor 


Bild 22.1 Die Menü-Meldung auf dem Bildschirm 


Danach können wir durch Drücken einer der Tasten 1... 9 das gesuchte 
Programm auswählen. Weil wir das Disassemblerprogramm erst in 23 
aufstellen werden, sollten wir in B000 einstweilen C7 eintragen. 
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P22. 

,4. 1 

(Pr ü-f summen am 

rechten Rand) 


011 

AA32 

11AOAA 

MENUEs 

L.D 

DE,TMEN 

; 01 SB 

012 

AA35 

CDEDAF 


CALL 

MSGNL 


013 

AA38 

UAQAA 


LD 

DE,TI 


014 

AA3B 

CDEDAF 


CALL 

MSGNL 


015 

AA3E 

11B 8 AA 


LD 

DE, T2 


016 

AA41 

CDEDAF 


CALL 

MSGNL 

; 0B6C 

017 

AA44 

11CCAA 


LD 

DE, T3 


018 

AA47 

CDEDAF 


CALL 

MSGNL 


019 

AA4A 

11D9AA 


LD 

DE, T4 


020 

AA4D 

CDEDAF 


CALL 

MSGNL 


021 

AA50 

11F3AA 


L.D 

DE, T5 

5 1507 

022 

AA53 

CDEDAF 


CALL 

MSGNL 


023 

AA56 

110BAB 


LD 

DE, T 6 


024 

AA59 

CDEDAF 


CALL 

MSGNL 


025 

AA5C 

1123AB 


LD 

DE, T7 


026 

AA5F 

CDEDAF 


CALL 

MSGNL 

5 1DE 8 

027 

AA62 

1132AB 


LD 

DE, T 8 


028 

AA65 

CDEDAF 


CALL 

MSGNL 


029 

AA 68 

113CAB 


LD 

DE, T9 


030 

AA 6 B 

CDEDAF 


CALL 

MSGNL 


031 

AA 6 E 

CDB309 

LOÜPs 

CALL 

??KEY 

; 2629 

032 

AA71 

FE21 


CP 

21H 

5 7 1 7 

033 

AA73 

CAOOBO 


JP 

Z,DISASS 


034 

AA76 

FE22 


CP 

22 H 

5 7 2 7 

035 

AA78 

CA47AB 


JP 

Z,GFFSET 


036 

AA7B 

FE 2 3 


CP 

23H 

; 2CBF 

037 

AA7D 

CABOAD 


JP 

Z,PRUESU 


038 

AA80 

FE24 


CP 

24H 

5 7 4 7 

039 

AA82 

CAF5AC 


JP 

Z,PDUMP 


040 

AA85 

FE25 


CP 

25H 

; 7 5 7 

041 

AAS 7 

CA34AE 


JP 

Z,DEZHEX 

5 3542 

042 

AA 8 A 

FE26 


CP 

26H 

; •' 6 7 

043 

AASC 

CA92AE 


JP 

Z,HEXDEZ 


044 

AA 8 F 

FE27 


CP 

27H 

5 •’ 7 7 

045 

AA91 

CA7CAC 


JP 

Z,VERSCH 


046 

AA94 

FE28 


CP 

2SH 

; 3CAD 

047 

AA96 

CAD7AB 


JP 

Z,VERIFY 


048 

AA99 

FE29 


CP 

29H 

; 7 9 7 

049 

AA9B 

CAO 000 


JP 

Z,MONITR 


050 

AA9E 

18CE 


JR 

LOOP 

5 41 DO 

051 

AAAO 


5 




052 

AAAO 

16 

TMEN: 

DEFB 

16H 


053 

AAA1 

4D92B0A5 


DEFM 

51 Menues * 


054 

AAA5 

923A 





055 

AAA7 

OD 


DEFB 

ODH 

; 44F3 
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056 AAA 8 31292044 Tis 

057 AAAC A6A4A1A4 

058 AAB0 A492B39A 

059 AAB4 B8929D 

060 AAB7 0D 

061 AAB 8 3229204F T2: 

062 AABC AAAAA492 

063 AAC0 969A929D 

064 AAC4 929F98B0 

065 AAC 8 A5B097 

066 AACB 0D 

067 AACC 33292050 T3s 

068 AAD0 9D 

069 AAD 1 AD 

070 AAD2 AAA4A5B3 

071 AAD 6 B392 

072 AAD 8 0D 

073 AAD9 34292053 T4: 

074 AADD 9E92A69F 

075 AAE1 98929DA1 

076 AAE5 A5A4A2A5 

077 AAE9 97209C9D 

078 AAED A59FA992 

079 AAF1 B0 

080 AAF2 0D 

081 AAF3 35292055 T5s 

082 AAF7 B3A3A1B0 

083 AAFB 9C92B8B0 

084 AAFF 2044455A 

085 AB03 202D3E20 

086 AB07 484558 

087 AB0A 0D 

088 AB0B 36292055 T 6 : 

089 AB0F B3A3A1B0 

090 AB13 9C92B8B0 

091 AB17 20484558 

092 AB 1 B 202D3E20 

093 AB1F 44455A 

094 AB22 0D 

095 AB23 37292056 T7s 

096 AB27 929DA49F 

097 AB2B 98A6929A 

098 AB2F 92B0 

099 AB31 0D 

100 AB32 38292056 T 8 s 

101 AB36 929DA6AA 


DEFM 7 1 ) Disassembler 7 


DEFB 0DH ;4CB7 

DEFM ”2) 0-f-f setber 7 


DEFM 'echnung' 

DEFB 0DH ;56DC 

DEFM 7 3) Pr' 

DEFB ADH 
DEFM 7 fsumme" 

DEFB 0DH ;5CEA 

DEFM -4) Spei ehera 7 


DEFM ’uszug drucken' 


DEFB 0DH j} 6A53 

DEFM 7 5) Umwandeln 7 


DEFM 7 DEZ -> HEX 7 


DEFB 0DH 5 7303 

DEFM 7 6 ) Umwandeln 7 


DEFM 7 HEX -> DEZ 7 


DEFB 0DH 5 7BB4 

DEFM 7 7) Verschieben 7 


DEFB 0DH ;82B5 

DEFM 7 8 ) Veri-fy 7 
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102 AB3A BD 

103 AB3B 0D 

104 AB3C 3929204D T9: 

105 AB40 B7B0A696 

106 AB44 B79D 

107 AB46 0D 

1063 AB47 ; 

109 AB47 


DEFB 0DH ;86DS 

DEFM "9) Monitor 7 

DEFB ODH 5 8BA8 

END 



23 

Disassembler 


Ein Disassembler ist ein Hilfsprogramm, das ein im Speicher stehendes 
Maschinenprogramm (Objektcode) teilweise in die Assemblersprache 
(Mnemonics, Operanden usw.) zurückübersetzt. Das wird häufig bei der 
Fehlersuche so gemacht und bei der Ausdeutung fremder Programme, 
deren Quelltext nicht vorliegt. Da beim Assemblieren die Program¬ 
miervariablen (Labels, symbolische Adressen usw.) nicht mit ihrem 
Namen in das Maschinenprogramm übergeben werden, sind diese nicht 
im Objektcode vorhanden und können auch aus ihm nicht zurückge¬ 
wonnen werden. Beim Disassemblieren erhält man also nur die Werte 
der Programmiervariablen und nicht ihre Namen. Man bezeichnet diese 
Darstellungsweise auch als Disassemblerformat. Ein Beispiel soll das 
deutlich machen: Im Quelltext können wahlweise Dezimal- oder Hexa¬ 
dezimalzahlen (in manchen Assemblern auch Binärzahlen) stehen. Der 
Disassembler erfährt davon nichts und liefert grundsätzlich Hexadezi¬ 
malzahlen: 


Aiäsembler-Quel .1 text (so wird eingegeben) 

PRNTsEQU 0012H 
REL 200H 
LABELaLD A, 53. 

CALL PRNT 
JR LABEL 
END 

Assembl erpratokol 1 (im Assembl er -f ormat) 


0000 

0000 

p 

PRNT: 

EQU 

REL 

0012H 
2000H 

2000 

3E33 

LABEL: 

LD 

A, 51 

2002 

CD1200 


CALL 

PRNT 

2005 

2007 

18F9 


JR 

END 

LABEL 
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Masczh i nenprogramm (Ob jektcode) 

2OO0 3E 33 CD 12 00 18 F9 

Dasselbe Programm im Disassemblerformat 

2000 3E 33 LD A,33 

2002 CD 12 00 CALL 1200 

2005 18 F9 JR 2000 


23.1 Zielsetzung und Grobentwurf 

Wir wollen kurz vor Abschluß dieses Buches einen Disassembler 
schreiben. Zielsetzung: 

1. Das Programm muß voll funktionsfähig sein. 

2. Es soll lesbar sein. 

3. Die Bedienung soll so aussehen: 

Das Programm meldet sich als Disassembler. Auf die Frage «von» wird 
die Anfangsadresse des zu disassemblierenden Speicherbereichs einge¬ 
geben, auf die Frage “bis» die Endadresse und auf die Frage «D/P» ein D, 
wenn nur angezeigt werden soll, oder ein P, wenn die Ausgabe auf 
Printer und Display erfolgen soll. 

Das Ausgabeformat wurde schon in Abschnitt 21.2 Umrissen; die 
Ausgabezeilen sollen in 1200... 1227 aufgebaut werden und müssen 
mit 0D enden, denn sie sollen mit MSG (bzw. und PMSG) ausgegeben 
werden. 

Wir teilen das Programm teils als verkürztes Assemblerprotokoll mit, 
teils als Hexdump. Weitere" Erkenntnisse kann der Leser gewinnen, 
indem er den Disassembler sich selbst disassemblieren läßt. Noch eine 
Verständnishilfe: Das IX-Register enthält stets die Anfangsadresse des 
jeweils zu disassemblierenden Befehls. 
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P23.1.1 Spei cherdi sposi ti on / Arbei tsberei c:h 


0000 

P 

ABER: 

EQU 

1200H ;1200. 

..1227 

0000 

P 

VON: 

EQU 

ABER+2SH ;1228. 

-.1229 

0000 

P 

BIS: 

EQU 

VON+02 ;122A. 

..122B 

0000 

P 

D/P: 

EQU 

B.TS+02 : 122C 


0000 

P 

EBER: 

EQU 

D/P+01 ;122D- 

..122E 

0000 

P 

JUMP: 

EQU 

EBER+02 ;122F- 

..1230 

0000 

P 

MNEMAD: 

EQU 

JUMP+02 ;1231. 

..1232 

0000 

P 

OPCODE: 

EQU 

MNEMAD+02;1233 


0000 

P 

SYMBOL: 

EQU 

OPCODE+01;1234 


0000 

P 

XYFLAG: 

EQU 

SYMBOL+01;1235 



23.2 Die trivialen Anfangsroutinen 


Das Hauptprogramm und die trivialen Anfangsroutinen können später 
durch Disassemblieren verständlich gemacht werden: 


P23.2. 1 


DISASS 

B 0 0 0 

1 1 

08 

B7 

CD 

15 

00 

CD 

06 

00 

CD 



B00A 

20 

BO 

CD 

5A 

B0 

C3 

9C 

B0 



0808 

WEITER 

B012 

A7 

ED 

5B 

28 

12 

2A 

2A 

12 

ED 

52 



B01C 

38 

EB 

18 

EC 







0DFD 

NEUBLK 

B020 

11 

25 

B7 

CD 

15 

00 

21 

29 

12 

CD 



B02A 

4C 

AF 

11 

2A 

B7 

CD 

15 

00 

21 

2B 

1410 


B034 

12 

CD 

4C 

AF 

3E 

00 

32 

2C 

12 

11 



B03E 

30 

B7 

CD 

15 

00 

CD 

B3 

09 

CD 

CE 

1B96 


B048 

0B 

F5 

CD 

12 

00 

CD 

06 

00 

Fl 

FE 



B052 

50 

C0 

3E 

01 

32 

2C 

12 

C9 



22BF 

NEIJZEI 

B05A 

CD 

8A 

B0 

CD 

65 

B0 

DD 

2A 

28 

12 



B064 

C9 










28B2 

ZEINR 

B065 

21 

00 

12 

ED 

5B 

28 

12 

CD 

74 

B0 



B06F 

53 

CD 

74 

B0 

C9 






2F65 


Die Routine D/ASC verwandelt eine im D-Register stehende zweistel¬ 
lige Hexadezimalzahl (also ein Byte) in den ASCII und legt die beiden 
Bytes in (HL) ab. 

P23.2.2 

D/ASC B074 7A F5 CB 3F CB 3F CB 3F CB 3F 
B07E CD DA 03 77 23 Fl CD DA 03 77 
B088 23 C9 


0BD9 
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NZINIT 

B08A 

21 

00 

12 

06 

17 

36 

20 

23 

10 

FB 



B094 

06 

11 

36 

0 D 

23 

10 

FB 

C9 



0FFE 

Dazu gehören 

die Texte 








TT I TL 

B708 

16 

44 

A 6 

A4 

Al 

A4 

A4 

92 

B3 

9A 



B712 

B 8 

92 

9D 

0 D 







0760 

TFEHL 

B716 

2A 

2A 

20 

46 

92 

98 

B 8 

92 

9D 

3F 



B720 

20 

2A 

2 A 

20 

0 D 






0C0B 

TVON 

B725 

AB 

B7 

B 0 

20 

0D 







TB IS 

B72A 

20 

9A 

A 6 

A4 

20 

0 D 






TD/P 

B730 

20 

44 

2 F 

50 

20 

0 D 





118B 


23.3 Einteilung und Codierung der Befehle 

Bevor wir zur ersten wesentlichen Decodierungsroutine gelangen, müs¬ 
sen wir auf die Klassifizierung der 698 Befehle der Z80-CPU eingehen. 
Hierfür sind nicht funktionale, sondern lediglich drucktechnische 
Gesichtspunkte und die benötigten Decodierungsroutinen maßgebend: 

Gruppe 1 

z. B. 00 NOP 

oder 02 LD (BC), A 

33 1-Byte-Befehle, denen unmittelbar Mnemonics zugeordnet werden: 


P23.3 

1 





B736 

35B2 

TGRls 

DEFW 

SGR1 


B738 

21 


DEFB 

21 H 

;Anzahl 

B739 

00 


DEFB 

00 


E<73A 

02 


DEFB 

02 


B75A 

4E4F50 

UGRls 

DEFM 

•-NOP ' 


B75D 

0 D 


DEFB 

0DH 


B75E 

4C442020 


DEFM 

'LD (BC )5 A' 


B762 

20284243 





B766 

292C41 





B769 

0 D 


DEFB 

0 DH 



Dasselbe vollständig als Hexdump: 

TGR1 B736 35 B2 21 OO 62 07 08 OA OF 12 

B740 17 1A 1F 27 2F 34 35 37 3F 76 033F 
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B74A 

86 

8E 

96 

9E 

A6 

AE 

B6 

BE 

C9 

09 


B754 

E3 

E9 

EB 

F3 

F9 

FB 





0F8F 

B75A 

4E 

4F 

50 

0D 

4C 

44 

20 

20 

20 

28 


B764 

42 

43 

29 

2C 

41 

00 

52 

4C 

43 

41 

13EB 

B76E 

0D 

45 

58 

20 

20 

20 

41 

46 

2C 

41 


B778 

46 

27 

0D 

4C 

44 

20 

20 

41 

2C 

28 

17C8 

B782 

42 

43 

29 

0D 

52 

52 

43 

41 

00 

4C 


B78C 

44 

20 

20 

20 

28 

44 

45 

29 

2C 

41 

1BEF 

B796 

0D 

52 

4C 

41 

00 

4C 

44 

20 

20 

20 


B7A0 

41 

2C 

28 

44 

45 

29 

0D 

52 

52 

41 

2011 

B7AA 

0D 

44 

41 

41 

00 

43 

50 

4C 

00 

49 


B7B4 

4E 

43 

20 

20 

28 

48 

4C 

29 

0D 

44 

242D 

B7BE 

45 

43 

20 

20 

28 

48 

4C 

29 

0D 

53 


B7C8 

43 

46 

0D 

43 

43 

46 

00 

48 

41 

4C 

287E 

B7D2 

54 

0D 

41 

44 

44 

20 

20 

41 

2C 

28 


B7DC 

48 

4C 

29 

00 

41 

44 

43 

20 

20 

41 

2C90 

B7E6 

2C 

28 

48 

4C 

29 

00 

53 

55 

42 

20 


B7F0 

20 

28 

48 

4C 

29 

00 

53 

42 

43 

20 

30C2 

B7FA 

20 

41 

2C 

28 

48 

4C 

29 

00 

41 

4E 


B804 

44 

20 

20 

28 

48 

4C 

29 

00 

58 

4F 

34ED 

B80E 

52 

20 

20 

28 

48 

4C 

29 

00 

4F 

52 


B818 

20 

20 

20 

28 

48 

4C 

29 

00 

43 

50 

38F7 

B822 

20 

20 

20 

28 

48 

4C 

29 

00 

52 

45 


B82C 

54 

0D 

45 

58 

58 

00 

45 

58 

20 

20 

3D20 

B836 

20 

CO 

53 

50 

29 

2C 

48 

4C 

0D 

4A 


B840 

50 

20 

20 

20 

28 

48 

4C 

29 

00 

45 

4132 

B84A 

58 

20 

20 

20 

44 

45 

2C 

48 

4C 

00 


B854 

44 

49 

00 

4C 

44 

20 

20 

20 

53 

50 


B85E 

2C 

48 

4C 

00 

45 

49 

00 




46D5 


Gruppe 2 

z. B. 00 . . 0011 INC ss 

3 ★ 4 = 12 1-Byte-Befehle, die durch Maskieren mit CF identifiziert 
werden, und in denen ein 16-bit-Register der Gruppe ss (BC, DE, HL, SP) 
zu decodieren ist. Gruppe 2A entsprechend mit Registergruppe qq (BC, 
DE, HL, AF): 

F'23.3. 2 


TGR2 

B865 

3B 

B2 

03 

03 

09 

0B 






UGR2 

B86B 

49 

4E 

43 

20 

20 

A4 

A4 

0D 

41 

44 

03FB 


B875 

44 

20 

20 

48 

4C 

2C 

A4 

A4 

0D 

44 



B87F 

45 

43 

20 

20 

A4 

A4 

0D 




08F5 

TGR2A 

B886 

44 

B2 

02 

CI 

C5 







UGR2A 

B88B 

50 

4F 

50 

20 

20 

A0 

A0 

0D 

50 

55 



B895 

53 

48 

20 

A0 

A0 

0D 





109C 
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Gruppe 3 

z. B. 00 . . . 100 INC r 

Insgesamt 12 ★ 7 = 84 1-Byte-Befehle, die durch Maskieren mit C7 
identifiziert werden, und in denen ein 8-bit-Register (B, C, D, E, H, L, A) 
zu decodieren ist. Dem Code 110 entspräche (HL), was jedoch vier 
Schreibpositionen belegt und deshalb schon in Gruppe 1 vorwegzuneh¬ 
men war. 

P23- 3- 3 


TGR3 

B89B 

4D 

B2 

03 

04 

05 

46 






UGR3 

B8A1 

49 

4E 

43 

20 

20 

9D 

0D 

44 

45 

43 

rW 

LU 

K« 

•S 


B8AB 

20 

20 

9D 

0D 

4C 

44 

20 

20 

20 

9D 



B8B5 

2C 

28 

48 

4C 

29 

0D 





0776 

TGR3A 

B8BB 

56 

B2 

09 

70 

80 

88 

90 

98 

A0 

A8 



B8C5 

B0 

B8 









0DD7 

UGR3A 

B8C7 

4C 

44 

20 

20 

20 

28 

48 

4C 

29 

2C 



B8D1 

9D 

0D 

41 

44 

44 

20 

20 

41 

2C 

9D 

1295 


B8DB 

0D 

41 

44 

43 

20 

20 

41 

2C 

9D 

0D 



B8E5 

53 

55 

42 

20 

20 

9D 

0D 

53 

42 

43 

176D 


B8EF 

20 

20 

41 

2C 

9D 

0D 

41 

4E 

44 

20 



B8F9 

20 

9D 

0D 

58 

4F 

52 

20 

20 

9D 

0D 

1C64 


B903 

4F 

52 

20 

20 

20 

9D 

0D 

43 

50 

20 



B90D 

20 

20 

9D 

0D 







1FAC 


Gruppe 4 

01. LD r,r' 

49 1-Byte-Befehle, die durch Maskieren mit C0 identifiziert werden, 
und in denen zwei Register der Gruppe r zu dekodieren sind. (HL) bleibt 
wieder ausgespart. Insbesondere wäre formal 76 = 0111 0110 = 01 110 
110 = LD (HL),(HL) eine unzulässige Deutung. Die Gruppe 1 mit dem 
Befehl HALT muß deshalb schon vorher abgearbeitet werden. 

P23« 3. 4 

TGR4 B911 5F B2 01 40 

UGR4 B915 4C 44 20 20 20 9D 2C 9D 0D 03B5 


Gruppe 5 

11 ... 000 RET cc 
Gruppe 5A 

11 ... 111 RST tt 
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P23.3.5 


TGR5 

B91E 

6B 

B2 

Ol 

C0 






UGR5 

B922 

52 

45 

54 

20 

20 

9F 

9F 

0D 

0454 

TGR5A 

B92A 

74 

B2 

01 

C7 






UGR5A 

B92E 

52 

53 

54 

20 

20 

96 

96 

0D 

08B4 


Gruppe 6 

z. B. 36 nn LD (HL),nn 

11 2-Bytes-Befehle; das erste Byte bestimmt den Mnemonic, das zweite 
wird einfach angehängt. Abweichend von der üblichen Befehlsnotie¬ 
rung bedeutet hier jedes n eine Schreibposition, also statt eines Bytes 
nur ein Halbbyte. 


P23.3. 

6 












TGR6 

B936 

7D 

B2 

0B 

36 

C6 

CE 

D3 

D6 

DB 

DE 



B940 

E6 

EE 

F6 

FE 







0A2E 

UGR6 

B944 

4C 

44 

20 

20 

20 

28 

48 

4C 

29 

2C 



B94E 

B0 

B0 

0D 

41 

44 

44 

20 

20 

41 

2C 

0F12 


B958 

B0 

B0 

0D 

41 

44 

43 

20 

20 

41 

2C 



B962 

B0 

B0 

0D 

4F 

55 

54 

20 

20 

28 

B0 

1571 


B96C 

B0 

29 

2C 

41 

0D 

53 

55 

42 

20 

20 



B976 

B0 

B0 

0D 

49 

4E 

20 

20 

20 

41 

2C 

1ABF 


B980 

28 

B0 

B0 

29 

0D 

53 

42 

43 

20 

20 



B98A 

41 

2C 

B0 

B0 

0D 

41 

4E 

44 

20 

20 

2082 


B994 

B0 

B0 

0D 

58 

4F 

52 

20 

20 

B0 

B0 



B99E 

0D 

4F 

52 

20 

20 

20 

B0 

B0 

0D 

43 



B9A8 

50 

20 

20 

B0 

B0 

0D 





2943 






Gruppe 7 









z. B. 10 ee 


DJNZ 

aaaa 





6 2-Bytes-Befehle, bei denen eine Sprungweite in eine absolute Adresse 
umzurechnen ist. 


P23.3.7 


TGR7 

B9AE 

96 

B2 

06 

10 

18 

20 

28 

30 

38 



UGR7 

B9B7 

44 

4A 

4E 

5A 

20 

B0 

B0 

B0 

B0 

0D 

0649 


B9C1 

4A 

52 

20 

20 

20 

B0 

B0 

B0 

B0 

0D 



B9CB 

4A 

52 

20 

20 

20 

4E 

5A 

2C 

B0 

B0 

0D42 


B9D5 

B0 

BO 

0D 

4A 

52 

20 

20 

20 

5A 

20 



B9DF 

2C 

B0 

B0 

B0 

B0 

0D 

4A 

52 

20 

20 

13FA 


B9E9 

20 

4E 

43 

2C 

B0 

B0 

B0 

B0 

0D 

4A 



B9F3 

52 

20 

20 

20 

43 

20 

2C 

B0 

B0 

B0 



B9FD 

B0 

0D 









1BCF 
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Gruppe 8 

00 ... 110 nn LD r,nn 


P23.3. 

8 












TGR8 

B9FF 

C5 

B2 

01 

06 








UGR8 

BA03 

4C 

44 

20 

20 

20 

9D 

2C 

BO 

BO 

OD 

04A4 






Gruppe 9 








z. 

B. 22 nn nn 


LD (nnnn) 

/HL 



P23.3. 

9 












T6R9 

BAOD 

E2 

B2 

06 

22 

2A 

32 

3A 

C3 

CD 



IJGR9 

BAI 6 

4C 

44 

20 

20 

20 

28 

BO 

BO 

BO 

BO 

07BA 


BA20 

29 

2C 

48 

4C 

OD 

4C 

44 

20 

20 

20 



BA2A 

48 

4C 

2C 

28 

BO 

BO 

BO 

BO 

29 

OD 

0D7E 


BA34 

4C 

44 

20 

20 

20 

28 

BO 

BO 

BO 

BO 



BA3E 

29 

2C 

41 

OD 

4C 

44 

20 

20 

20 

41 

132A 


BA48 

2C 

28 

BO 

BO 

BO 

BO 

29 

OD 

4A 

50 



BA52 

20 

20 

20 

BO 

BO 

BO 

BO 

OD 

43 

41 



BA5C 

4C 

4C 

20 

BO 

BO 

BO 

BO 

OD 



1E44 


Gruppe 10 

00 . . 0001 nn nn LD ss,nnnn 

P23.3.10 

TGR10 BA64 OA B3 Ol Ol 

UQRIO BA68 4C 44 20 20 20 A4 A4 2C BO BO 

BA72 BO BO OD Q5FQ 

Gruppe 11 

11... 010 nn nn JP cc,nnnn 

P23.3.11 


TGR11 

BA75 

13 

B3 

02 

C2 

C4 







IJGR11 

BA7A 

4A 

50 

20 

20 

20 

9F 

9F 

2C 

BO 

BO 

0612 


BA84 

BO 

BO 

OD 

43 

41 

4C 

4C 

20 

9F 

9F 



BASE 

2C 

BO 

BO 

BO 

BO 

OD 





0CF2 


truppe 

z. B. CB 06 RLC (HL) 



Disassembler 


P23.3.12 


TGRC1 

BA94 

IC 

B3 

07 

06 

0E 

16 

IE 

26 

2E 

3E 

UGRC1 

BA9E 

52 

4C 

43 

20 

20 

28 

48 

4C 

29 

0D 


BAAS 

52 

52 

43 

20 

2.0 

28 

48 

4C 

29 

0D 


BAB2 

52 

4C 

20 

20 

20 

28 

48 

4C 

29 

0D 


BABC 

52 

52 

20 

20 

20 

28 

48 

4C 

29 

0D 


BAC6 

53 

4C 

41 

20 

20 

28 

48 

4C 

29 

0D 


BAD0 

53 

52 

41 

20 

20 

28 

48 

4C 

29 

0D 


BADA 

53 

5^ 

4C 

20 

20 

28 

48 

4C 

29 

0D 







Gruppe C2 








z. B. 

CB 

00000 . . . 


RLC r 


P23.3. 

13 










TGRC2 

BAE4 

22 

B3 

07 

00 

08 10 

18 

20 

28 

38 

UGRC2 

BAEE 

52 

4C 

43 

20 

20 9D 

0D 

52 

52 

43 


BAF8 

20 

20 

9D 

0D 

52 4C 

20 

20 

20 

9D 


BB02 

0D 

52 

52 

20 

20 20 

9D 

0D 

53 

4C 


BB0C 

41 

20 

20 

9D 

0D 53 

52 

41 

20 

20 


BB16 

9D 

0D 

53 

52 

4C 20 

20 

9D 

0D 



Gruppe C3 

z. B. CB 01 ... 110 BIT b,(HL) 

Liest man die Belegung der drei Punkte binär, erhält man 
adressierten Bits. 

P23.3.14 


TGRC3 

BB1F 

31 

B3 

03 

46 

86 

C6 





UGRC3 

BB25 

42 

49 

54 

20 

20 

9A 

2C 

28 

48 

4C 


BB2F 

29 

0D 

52 

45 

53 

20 

20 

9A 

2C 

28 


BB39 

48 

4C 

29 

0D 

53 

45 

54 

20 

20 

9A 


BB43 

2C 

28 

48 

4C 

29 

0D 









Gruppe C4 




z. B. 

CB 01 . 


BIT b,r 


F'23.3. 

15 






TGRC4 

BB49 

3A B3 

03 40 

80 

C0 


ÜQRC4 

BB4F 

42 49 

54 20 

20 

9A 2C 9D 0D 

52 


BB59 

45 53 

20 20 

9A 

2C 9D 0D 53 

45 


BB63 

54 20 

20 9A 

2C 

9D 0D 
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03C3 
07CC 
OBD4 
100F 


043E 
09 ID 
0DF3 

den Index des 

051A 

0B16 

0551 

0A35 
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P23-3. 
TGRE1 


UGRE1 


P23.3 

TGRE2 

UGRE2 


P23.3, 

TGRE3 

UGRE3 


Gruppe El 

z. B. ED 44 NEG 

16 


BB6A 

46 

B3 

IC 

44 

45 

46 

47 

4D 

4F 

56 


BB74 

57 

5E 

5F 

67 

6F 

A0 

Al 

A2 

A3 

A8 

0835 

BB7E 

A9 

AA 

AB 

B0 

Bl 

B2 

B3 

B8 

B9 

BA 


BB88 

BB 










0FDF 

BB89 

4E 

45 

47 

0D 

52 

45 

54 

4E 

0D 

49 


BB93 

4D 

20 

20 

20 

30 

0D 

4C 

44 

20 

20 

140F 

BB9D 

20 

49 

2C 

41 

0D 

52 

45 

54 

49 

0D 


BBA7 

4C 

44 

20 

20 

20 

52 

2C 

41 

0D 

49 

1838 

BBB1 

4D 

20 

20 

20 

31 

0D 

4C 

44 

20 

20 


BBBB 

20 

41 

2C 

49 

0D 

49 

4D 

20 

20 

20 

1BCC 

BBC5 

32 

0D 

4C 

44 

20 

20 

20 

41 

2C 

52 


BBCF 

OD 

52 

52 

44 

0D 

52 

4C 

44 

0D 

4C 

1FF7 

BBD9 

44 

49 

0D 

43 

50 

49 

0D 

49 

4E 

49 


BBE3 

OD 

4F 

55 

54 

49 

0D 

4C 

44 

44 

0D 

2496 

BBED 

43 

50 

44 

0D 

49 

4E 

44 

0D 

4F 

55 


BBF7 

54 

44 

0D 

4C 

44 

49 

52 

0D 

43 

50 

2976 

BC01 

49 

52 

0D 

49 

4E 

49 

52 

0D 

4F 

54 


BCOB 

49 

52 

0D 

4C 

44 

44 

52 

OD 

43 

50 

2E6E 

BC15 

44 

52 

0D 

49 

4E 

44 

52 

OD 

4F 

54 


BC1F 

44 

52 

0D 








3191 


Gruppe E2 

z. B. ED 01 . . . 000 IN r,(C) 


17 

BC22 4C B3 02 40 41 

BC27 49 4E 20 20 20 9D 2C 28 43 29 03D6 

BC31 0D 4F 55 54 20 20 28 43 29 2C 

BC3B 9D 01) 0685 

Gruppe E3 

z. B. ED 01 . . 0010 SBC HL,ss 

Gruppe E4 

z. B. ED 01 . .0011 nn nn LD (nnnn),ss 

18 

BC3D 5B B3 02 42 4A 

BC42 53 42 43 20 20 48 4C 2C A4 A4 04BC 

BC4C 0D 41 44 43 20 20 48 4C 2C A4 

BC56 A4 0D 


07E6 
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TGRE4 

UGRE4 


BC58 6 A B3 
BC5D 4C 44 
BC&7 29 2 C, 
BC71 A4 A4 


02 43 4B 
20 20 20 28 
A4 A4 0D 4C 
2C 28 BO BO 


BO BO B0 BO 
44 20 20 20 
BO BO 29 OD 


0D6B 

1497 


Gruppe Dl 

z. B. DD 23 INC IX 

bzw. FD 23 INC IY 


Diese Gruppe (und die folgenden) schließt auch die Befehle ein bei 
denen „«h de, Decodierung ledigüeh ein lode, zwei, X V unrzuwan 


P23.3, 

TGRD 1 

UGRD 1 


TGRD 2 

UGRD2 


19 

BC7B 84 
BC85 49 
BC 8 F 43 
BC99 20 
BCA3 53 
BCAD 48 
BCB7 28 
BCC 1 53 
BCC7 8 D 
BCCB 41 
BCD5 OD 


07 23 2B El E3 
43 20 20 49 58 
20 49 58 OD 50 
58 0D 45 58 20 
29 2C 49 58 OD 
49 58 OD 4A 50 
58 29 OD 4C 44 
2C 49 58 OD 


2C 49 
Ol 09 


E5 E9 F9 
OD 44 45 
4F 50 20 
20 20 28 
50 55 53 
20 20 20 
20 20 20 


20 49 58 2C 9E 9E 


Die restlichen Gruppen werden ohne nähere Spezifikation 


itgeteilt: 


P23.3.20 


TGRD3 

UGRD3 


BCD 6 99 B3 0A 34 
BCE0 AE B 6 BE 
BCE3 49 4E 43 20 
BCED 9C 29 0D 44 
BCF'7 58 2B 9C 9C 
BD 01 20 41 2C 28 
BD0B OD 41 44 43 
BDI5 58 2B 9C 9C 
BD 1 F 20 28 49 58 
BD29 42 43 20 20 
BD33 9C 9C 29 0D 
BD3D 49 58 2B 9C 
BD47 20 20 28 49 
BD51 4F 52 20 20 
BD5B 9C 29 0D 43 
BD65 58 2B 9C 9C 


35 86 SE 96 9E A 6 

20 28 49 58 2B 9C 
45 43 20 20 28 49 
29 0D 41 44 44 20 
49 58 2B 9C 9C 29 
20 20 41 2C 28 49 
29 0D 53 55 42 20 
2B 9C 9C 29 0D 53 
41 2C 28 49 58 2B 
41 4E 44 20 20 28 
9C 29 0D 58 4F 52 
58 2B 9C 9C 29 0D 
20 28 49 58 2B 9C 
50 20 20 20 28 49 
29 0D 


06CF 

0BC8 

1184 

1672 

1B6D 

2149 

267C 

2AA3 
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TGRD4 

UGRD4 

TGRD4A 

UGRD4A 


TGRD6 

UGRD6 


TGRDC1 

UGRDC1 


TGRDC2 

UGRDC2 


BD6B A 
BD6F 4 
BD79 : 
BD7E E 
BD82 >■ 
BD8C c 
BD91 ( 
BD95 ‘ 
BD9F 1 
BDA5 1 
BDAB 
BDB5 
BDBF 
BDC9 
BDD3 
BDD6 
BDEO 
BDEA 
BDF4 
BDFE 
BE08 
BE 12 
BE IC 
BE26 
BE30 
BE3A 
2 BE3B 
2 BE41 
BE4B 


A5 B3 01 
4C 44 20 
2B 9C 9C 
B4 B3 01 
4C 44 20 
9C 29 2C 


C3 B3 01 


4C 44 20 : 
9C 29 2C 1 
DA B3 ©3 : 
4C 44 20 : 
B0 B0 0D 
B0 B0 B0 
20 20 20 
B0 29 0D 
F4 B3 07 
52 4C 43 
9C 29 0D 
58 2B 9C 
20 28 49 
52 20 20 
29 0D 53 
2B 9C 9C 
28 49 58 
i 4C 20 20 
i 0D 

( 00 B4 03 
42 49 54 
i 2B 9C 9C 
j 9A 2C 28 
- 53 45 54 
? 2B 9C 9C 


20 20 9D 
29 0D 
70 

20 20 28 
9D 0D 
36 

20 20 28 


2C 28 49 58 


49 58 2B 9C 


20 20 28 
B0 B0 0D 
21 22 2A 
20 20 49 
4C 44 20 
29 2C 49 
49 58 2C 


49 58 2E< 9C 


58 2C B0 B0 
20 20 28 B0 
58 0D 4C 44 
28 B0 B0 B0 


16 IE 
28 49 
43 20 
0D 52 
9C 9C 
49 58 


26 2E 3E 
58 2B 9C 
20 28 49 
4C 20 20 
29 0D 52 
2B 90 9C 
28 49 58 
41 20 20 
0D 53 52 
9C 9C 29 


46 86 C6 
20 20 9A 2C 28 49 58 

29 0D 52 45 53 20 20 

49 58 2B 9C 9C 29 0D 

20 20 9A 2C 28 49 58 


Dann fehlen nur noch die einzusetzenden Symbole. 


.21 

BE6E 30 31 32 33 34 35 36 -'7 

BE76 4E 5A 5A 20 4E 43 43 20 jö 4F 

BE80 50 45 50 20 4D 20 

piiraA 42 43 44 45 49 58 53 50 


BE86 42 43 4 ., 
BE8E 42 43 44 45 48 4C 41 46 
BE96 42 43 44 45 48 4C 2A 41 


BE9E 4 
BEA6 3 
BEB0 3 


2 43 44 45 48 4C 53 50 

;0 30 30 38 31 30 31 38 32 30 

;2 38 33 30 33 38 


Prüf summe (B708 


BEB5) 


305D 

3650 

3CDB 

41F5 

48CD 

4D18 

5251 

578A 

5D3C 

621A 

680F 

6D06 

72F1 

7745 


05C3 
0A3E 
0E90 
11BC 
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23.4 Die ersten Decodierungsroutinen 


Wenn man trotz der Vielfalt der Z80-Befehlc zeitsparend disassemblie- 
ren will, muß man frühzeitig und effektiv in Befehlsgruppen verzwei¬ 
gen. Diese Aufgabe erfüllt DECODE nebst nachfolgenden Programmab¬ 
schnitten. Danach werden IY und HL mit den Anfängen der Tabellen 
TGR und UGR geladen und eine SUchMNcmonic-Routine aufgerufen. 


P23.4.1 


B09C DD7E00 
B09F 323312 
B0A2 FECB 
B0A4 CA45B1 
B0A7 FEED 
B0A9 CA76B1 
B0AC FEDD 
B0AE CAA7B1 
B0B1 FEFD 
B0B3 CAAEB1 
B0B6 FD2136B7 
BOBA 215AB7 
B0BD CD0FB4 
B0C0 FD2165B8 
B0C4 216BB8 
B0C7 CD3EB4 
B0CA FD21S6B8 
B0CE 218BB8 
B0D1 CD53B4 

Und weiter als 


DECODE: 


LD 

A, <IX+00) 


LD 

COPCODE),A 


CP 

CBH 


JP 

Z,GRCB 


CP 

EDH 


JP 

Z, GRED 


CP 

DDH 


JP 

Z,GRDD 


CP 

FDH 


JP 

Z, GRFD 

5 1158 

LD 

IY,TGR1 

; Gr. 1 

LD 

HL., UGR 1 

CALL 

SUMNEM 


LD 

IY,TGR2 

CN 

X. 

CD 

LD 

HL,UGR2 

CALL 

SLJMN02 


LD 

IY,TGR2A 

;Gr.2A 

LD 

HL,UGR2A 

CALL 

SUMN2A 

; 20F7 


Hex dump 


B0D4 FD 21 9B B8 
B0DE FD 21 BB B8 
B0E8 FD 21 11 B9 
B0F2 FD 21 IE B9 
B0FC FD 21 2A B9 
B106 FD 21 36 B9 
Bl 10 FD 21 AE B9 
Bl 1A FD 21 FF B9 
Bl24 FD 21 0D BA 
B12E FD 21 64 BA 
Bl38 FD 21 75 BA 
Bl42 C3 EF B6 
GROB Bl45 DD 7E 01 32 
B14F 21 9E BA CD 
Bl59 21 EE BA CD 


21 

Al 

B8 

CD 

63 

B4 


21 

C7 

B8 

CD 

78 

B4 

0BF9 

21 

15 

B9 

CD 

8F 

B4 


21 

22 

B9 

CD 

9A 

B4 

15EC 

21 

2E 

B9 

CD 

A5 

B4 


21 

44 

B9 

CD 

OF 

B4 

1FD6 

21 

B7 

B9 

CD 

OF 

B4 


21 

03 

BA 

CD 

BO 

B4 

2B61 

21 

16 

BA 

CD 

0F 

B4 


21 

68 

BA 

CD 

BB 

B4 

3582 

21 

7A 

BA 

CD 

C6 

B4 








3DD3 


12 

FD 

21 

94 

BA 


12 

B4 

FD 

21 

E4 

BA 

47DA 

D6 

B4 

FD 

21 

1F 

BB 
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B163 
B16D 
GRED Bl76 
Bl 80 
B18A 
B194 
B19E 
GRDD B1A7 
GRFD BlAE 
GRDDFD B1B3 
B1BD 
B1C7 
B1D1 
Bl DB 
B1E5 
B1EF 
B1F9 
B203 
GRDCFC B207 
B211 
B21B 
B225 
B22F 


21 

21 


.cixJ 

4F 


DD 7E 
21 89 
21 27 
21 42 
21 5D 
3E 00 
3E Ol 
DD 7E 
B2 FD 
B4 FD 
B5 FD 
B4 FD 
B5 FD 
B5 FD 
B4 FD 
B4 C3 
DD 7E 
28 15 
FD 21 
C3 EF 
CD 12 


BB CD EB 
BB CD 0O 
Ol 32 33 
BB CD 12 
BC CD 15 
BC CD 25 
BC CD 35 
32 35 
32 35 


12 
12 

01 32 33 
21 7B BC 
21 C7 BC 
21 D6 BC 
21 6B BD 
21 7E BD 
21 91 BD 
21 A5 BD 


B4 FD 21 49 BB 
B5 C3 EF B6 
12 FD 21 6A BB 
B4 FD 21 22 BC 
B5 FD 21 3D BC 
B5 FD 21 58 BC 
B5 C3 EF B6 
18 05 

12 FE CB CA 07 
21 85 BC CD 0F 
21 CB BC CD 45 
21 E3 BC CD 0F 
21 6F BD CD 50 
21 82 BD CD 5B 
21 95 BD CD 0F 
21 AB BD CD 0F 


EF B6 
03 32 33 
FE 86 28 
D6 BD 21 
B6 FD 21 
B4 C3 EF 


12 E6 C7 FE 46 
11 FE C6 28 0D 
E0 BD CD 0F B4 
3B BE 21 41 BE 
B6 


5381 
5CAC 
6652 
70 A3 

769C 
81F0 
8D55 
985B 
Al IO 
A9C9 

B962 


SGR sind Subroutinen, die die Bearbeitung der einzelnen Gruppen von 
einer ziemlich hohen Ebene aus steuern. Zuerst wird der gefundene 
Mnemonic an die richtige Stelle des Ausgabebereichs übertragen 
(BLockTRAnSfer). Dann wird IX um eins erhöht und gleichzeitig ein 
Byte (Opcode) in den Ausgabebereich übertragen. Im Verlauf von SGR2 
wird außerdem noch in den Schriftsatz für ss das durch Bit5 bis Bit4 
bestimmte Symbol hineingetauscht (EXchange). So erledigt jede SGR- 
Routine ihre Koordinierungsaufgabe. 


P23.4.2 
B235 CD66B5 
B238 C384B5 
B23B CD66B5 
B2.3E CD8BB6 
B241 C384B5 
B244 CD66B5 
B247 CD64B6 
B24A C384B5 


SGR 1 s 

CALL 

BLTRAS 


JP 

INKR1 

SGR2: 

CALL 

BLTRAS 


CALL 

EXss54 


JP 

INKR1 

SGR2A: 

CALL 

BLTRAS 


CALL 

EXqq54 


JP 

INKR1 


; OFAl 
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Und weiter als Hexdump 


SGR3 

SGR3A 

SGR4 

SGR 5 

SGR5A 

SGR6 


SGR10 
SGR11 
SGR'C 1 
SGRC2 


SGRC4 

SGRE1 

SGRE2 

SGRE3 

SGRE4 


SGRD1 

SGRD2 

SGRD3 

SGRD4 


B24D 
B256 
B25F 
B269 
B26B 
B274 
B27D 
B287 
B291 
B296 
B2A0 
B2AA 
B2B4 
B2BE 
B2C5 
B2CF 
B2D9 
B2E2 
B2EC 
B2F6 
B30O 
B30A 
B313 
B31C 
B322 i 
B32C 
B336 i 
B33A ( 
B344 ‘ 
B346 ( 
B34C ( 
B356 : 
B35B C 
B365 £ 
B36A C 
B374 1 
B37E C 
B384 C 
B38D C 
B397 7 
B399 C 
B3A3 7 
B3A5 C 
B3AF 7 


D CD 66 B5 

6 CD 66 E<5 
F CD 66 B5 
9 84 B5 

B CD 66 B5 

4 CD 66 B5 
[) CD 66 B5 

7 CD 74 B0 
L 36 B6 C3 
=» CD 66 B5 
> CD 74 B0 
* CB 7B 28 
i D5 3E BO 
: 53 CD 36 

5 CD 66 B5 
‘08 12 CD 
1 DD 56 01 

1 CD 66 B5 
74 B0 DD 
74 B0 Dl 
B6 DD 56 
CD 66 B5 
CD 66 B5 
CD 66 B5 
CD 66 B5 : 
7E B6 C3 
B6 C3 7F ] 
CD 66 B5 ( 
7F B5 
CD 66 B5 £ 
CD 66 B5 I 
71 B6 C3 : 
CD 66 B5 I 
SB B6 C3 : 
CD 66 B5 C 
12 DD 56 C 
CD 36 B6 C 
CD 66 B5 C 
CD 66 B5 C 
7F B5 

CD 66 B5 C 
7A B5 

CD 66 B5 C 
71 B6 C3 7 


CD 71 
CD 7E 
CD 71 

CD 4A 
CD 98 
DD 56 
Dl 3E 
7F B5 
DD 56 


B6 C3 84 B5 
B6 C3 84 B5 
B6 CD 7E B6 C3 

B6 C3 84 B5 
B6 C3 84 B5 
01 D5 21 08 12 
B0 32 34 12 CD 


01 D5 
16 00 


32 34 
B6 C3 
CD 71 
74 B0 
CD 36 
DD 56 


7F B5 
B6 DD 
3E B0 
B6 C3 


01 CD 
CD 8B 
CD 4A 
C3 7F 
DD 7E 
7F B5 
B5 

CD 3D 


36 B6 
B6 C3 
B6 C3 
B5 

01 32 
CD 66 


21 08 12 
DD ES El 
19 54 5D 
36 B6 Dl 

56 01 21 

32 34 12 
7F B5 

08 12 CD 
OB 12 CD 
12 CD 36 
C3 7A B5 
E5 B2 
E5 B2 

33 12 CD 
B5 CD 3D 


DD 7E 
7F B5 
DD 7E 
7F B5 
CD 8B 
03 CD 
C3 75 
CD B2 
CD 57 


B6 CD 7E B6 C3 
B5 

01 32 33 12 CD 
01 32 33 12 CD 


CD B2 
7A B5 


B6 3E BO 32 34 
36 B6 DD 56 02 
B5 

B6 C3 7F B5 
B6 CD B2 B6 C3 

B6 CD C9 B6 C3 

B6 CD C9 B6 CD 


1 BSE 
2337 
2EE7 
3808 
3F1 7 
4790 
5058 
58FA 
6202 
6A99 

7C8D 

84F4 

8DBE 

955E 

9DC5 

A56B 

ADED 

B5C9 

C297 

CAF7 

D35C 
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SGRD4A B3B4 
B3BE 
SGRD5 B3C3 
B3CD 
B3D7 
SGRD6 B3DA 
B3E4 
B3EE 
SGRDC1 B3F4 
B3FE 
SBRDC2 B400 


66 B5 CD 
B6 C3 7A 
66 B5 CD 
32 34 12 
75 B5 
66 B5 CD 
DD 56 03 
36 B6 C3 
66 B5 CD 
B5 

66 B5 CD 
B6 C3 75 


B6 

CD 

C9 

B6 

CD 

DDAB 

B6 

CD 

C9 

B6 

3E 

E779 

56 

03 

CD 

36 

B6 

ED7C 

B6 

3E 

B0 

32 

34 


36 

B6 

DD 

56 

02 

F723 

B5 





101F5 

B6 

CD 

C9 

B6 

C3 

B6 

CD 

C9 

B6 

CD 

10D35 


23.5 Das Auffinden der Mnemonics 

Die Subroutine SUMNEM (SUche MNEMonic) und die folgenden über¬ 
tragen zunächst die in TGR stehende SGR-Adresse nach JUMP und 
laden die Anzahl der Eintragungen in TGR/UGR nach B. Beim Suchen 
wird in TGR immer um eins weitergezählt, in UGR bis zum nächsten 
OD. Die Adresse eines als richtig erkannten Mnemonics wird nach 
MNEMAD zwischengespeichert und dann nach SGRx gesprungen. 


P23-5-1 
SUMNEM B40F 
B419 
B423 
B42D 
B437 
SUMN02 B43E 
B448 
B452 
SUMN2A B453 
B45D 
SUMN03 B463 
B46D 
B477 
SUMN3A B478 
B482 
B48C 
SUMN04 B48F 
B499 


3A 33 
43 2F 
FD 23 
2A 2F 
FA Fl 
3A 33 
FE 09 
C9 

3A 33 
FE C5 
3A 33 
FE 05 
C9 

3A 33 
E6 C0 
C3 12 
3A 33 
C9 


12 FD 4E 00 FD 46 01 ED 

12 FD 46 02 FD 23 FD 23 

FD BE 00 20 07 22 31 12 

12 E9 FS 7E FE 0D 23 20 

FD 23 10 ES 89 

12 E6 CF FE 03 CA 12 B4 
CA 12 B4 FE 0B CA 12 B4 

12 E6 CF FE CI CA 12 B4 
CA 12 B4 C9 

12 E6 C7 FE 04 CA 12 B4 
CA 12 B4 FE 46 CA 12 B4 

12 E6 F8 FE 70 CA 12 B4 
FE 80 C0 3A 33 12 E6 FÖ 
B4 

12 E6 C0 FE 40 CA 12 B4 



SUMNÖ5 B49A 3A 
B4A4 C9 
SUMN5A B4A5 3A 
B4AF C9 
SUMNÖ8 B4B0 3A 
B4BA C9 
SUMN10 B4BB 3A 
B4C5 C9 
SUMN11 B4C6 3A 
B4D0 FE 
SUMNC2 B4D6 3A 
B4E0 FE 
B4EA B4 
SUMNC3 B4EB 3A 
B4F5 FE 
B4FF C9 
SUMNC4 B500 3A 
B50A FE 
B514 C9 
SMNE2 B515 3A 
B51F FE 
SUMNE3 B525 3A 
B52F FE 
SUMNE4 B535 3A 
B53F FE 
SUMND2 B545 3A 
B54F C9 
SUMND4 B550 3A 
B55A C9 
SUMD4A B55B 3A 
B565 C9 
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33 

12 

E6 

C 7 

FE 

C0 

33 

12 

E6 

C7 

FE 

C7 

33 

12 

E6 

C7 

FE 

06 

o« 0* 

12 

E6 

CF 

FE 

01 

33 

12 

E6 

C7 

FE 

C2 

C4 

CA 

12 

B4 

C9 



12 

E6 

F8 

FE 

30 

00 

C0 

3A 

33 

12 

E6 

33 

12 

E6 

C7 

FE 

46 

86 

CA 

12 

B4 

FE 

C6 

"TT 

12 

E6 

C0 

FE 

40 

80 

CA 

12 

B4 

FE 

C0 

33 

12 

E6 

C7 

FE 

40 

41 

CA 

12 

B4 

C9 


33 

12 

E6 

CF 

FE 

42 

4A 

CA 

12 

B4 

G9 


33 

12 

E6 

CF 

FE 

43 

4B 

CA 

12 

B4 

C9 


0» 0« 

12 

E6 

CF 

FE 

09 

33 

12 

E6 

C7 

FE 

46 

33 

12 

E6 

F8 

FE 

70 
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CA 

12 

B4 

4BF2 

CA 

12 

B4 

523C 

CA 

12 

B4 

57C5 

CA 

12 

B4 

5D51 

CA 

12 

B4 

6396 

C8 

E6 

C0 

6DAA 

F8 

C3 

12 

734E 

CA 

12 

B4 


CA 

12 

B4 

7EB6 

CA 

12 

B4 

8472 

CA 

12 

B4 

8B97 

CA 

12 

B4 

9429 

CA 

12 

B4 

9CCE 

CA 

12 

B4 

A575 

CA 

12 

B4 

AB09 

CA 

12 

B4 

B0D2 

CA 

12 

B4 

B6F6 


23.6 Die Übertragung in den Ausgabebereich 


Die Subroutine BLTRAS transferiert den gesuchten String aus UGRx in 
den Ausgabebereich: 

P23.6. 1 


B566 

111212 

BLTRAS: 

LD 

DE,ABER+12H 

B569 

2A3112 


L.D 

HL,(MNEMAD) 

B56C 

7E 

LBT0s 

LD 

A, (HL) 

B56D 

12 


L.D 

(DE)„A 

B56E 

13 


INC 

DE 
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B56F 

23 

INC 

HL 

B570 

FEOD 

CP 

ODH 

B572 

20F8 

JR 

NZ,LBTO 

B574 

C9 

RET 



; 0454 


Im folgenden werden die benötigten Opcodes in den Ausgabebereich 
übertragen und der Programmzähler IX nebst Pointer «VON» entspre¬ 
chend der Länge des disassemblierten Befehls erhöht. 


P23-6. 

2 



INKR4 

B575 

CD 

AD 

INKR3 

B57A 

CD 

B6 

INKR2 

B57F 

CD 

BF 

INKR1 

B584 

CD 

C8 


B58E 

23 

DD 


B598 

CD 

15 


B5A2 

33 

o 3 


B5AC 

BO 


BYTE4 

B5AD 

DD 

56 


B5B7 

56 

02 


BSC 1 

01 

21 


B5CB 

21 

05 


B5 

18 

OF 



B5 

18 

OC 



B5 

18 

09 



B5 

18 

06 

DD 

23 

23 

DD 

22 

28 

12 

00 

CD 

06 

OO 

3A 

CA 

12 

BO 

CD 

A5 

03 

21 

OE 

12 

CD 

21 

OB 

12 

CD 

74 

08 

12 

CD 

74 

BO 

12 

CD 

74 

BO 

C9 


04B2 


DD 

23 

DD 

0C59 

11 

00 

12 


2C 

12 

A7 

11AC 

01 

C3 

12 





1696 

74 

BO 

DD 


BO 

DD 

56 

1E95 

DD 

56 

00 



24E7 


23.7 Ersatz von Platzhaltersymbolen 


Die Routine ERS542 setzt den durch Bit5 bis Bit4 bestimmten 2stelli- 
gen Substituenten für das Platzhaltersymbol in den Ausgabebereich ein. 
Für die anderen SGR .. .-Routinen gilt das Entsprechende. 


P23.7.1 


ERS542 

BSD 2 

CD 

E2 

B6 

3A 

33 


B5DC 

CB 

3F 

CB 

3F 

32 


BSE 6 

FD 

7E 

00 

77 

FD 


B5F0 

77 

C9 




ERS531 

B5F2 

CD 

E2 

B6 

3A 

33 


B5FC 

CB 

3F 

CB 

3F 

32 


E<606 

77 

C9 




ER8532 

B608 

CD 

E2 

B6 

3A 

33 


B612 

CB 

3F 

32 

IC 

B6 


B61C 

00 

77 

FD 

23 

23 

ERS201 

B626 

CD 

E2 

B6 

3A 

33 


B630 

B6 

FD 

7E 

00 

77 

ERSnn 

B636 

CD 

E2 

B6 

CD 

74 


12 

E6 

30 

CB 

3F 


E8 

B5 

32 

EF 

B5 

OABD 

23 

23 

FD 

7E 

00 







10AD 

12 

E6 

38 

CB 

3F 


05 

B6 

FD 

7E 

00 

1A35 

12 

E6 

38 

CB 

3F 

2081 

32 

23 

B6 

FD 

7E 


FD 

7E 

00 

77 

C9 

298A 

12 

E6 

07 

32 

33 



C9 

BO C9 3650 
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Die Routinen ERSxxx werden aufgerufen z. B. von EXb53 Dieses als 
Beispiel dargestellte Unterprogramm bewirkt den Austausch des Sym¬ 
bols «b» gegen den von Bit5 bis Bit3 bestimmten String. Dieser wird in 
Tb gefunden. 


P23.7.2 

EXb53 B63D FD 21 6E BE 3E 9A 32 34 12 CD 
B647 F2 B5 C9 

EXcc53 B64A FD 21 76 BE 3E 9F 32 34 n CD 
B654 08 B6 C9 “ 

EXpp54 B657 FD 21 86 BE 3E 9E 32 34 l? rn 
B661 D2 B5 C9 

EXqq54 B664 FD 21 8E BE 3E AO 32 34 12 CD 
B66E D2 B5 C9 

EXr53 B671 FD 21 96 BE 3E 9D 32 34 12 CD 
B67B F2 B5 C9 

EXr20 B67E FD 21 96 BE 3E 9D 32 34 12 CD 
B688 26 B6 C9 

EXss>54 B68B FD 21 9E BE 3E A4 32 34 p CD 
B695 D2 B5 C9 

EXtt53 B698 FD 21 A6 BE 3E 96 32 34 12 CD 
B6A2 08 B6 C9 


06D7 

0CD2 

13A5 

1AB2 

2184 

27BB 

2EAC 

34CE 


EXPLMI ersetzt « + » durch «-», wenn dd > 7F. 

EXXYXY ersetzt bis zu zweimal «X» durch «Y». 

OFFS: Glücklicherweise stehen die Offsets zu den Indexregistern stets 
im dritten Byte. 

SUCH sucht 22 Stellen des Ausgabebercichs nach dem in 1234 stehen¬ 
den Symbol ab und übergibt die Adresse des ersten gesuchten Symbols 
an das HL-Register. Der Leser studiere im Z80-Handbuch aufmerksam 
die Erklärung des Blocksuchbefchls CPIR. 

P23.7.3 


EXPLMI 

B6A5 

F5 

3E 

2B 

32 

34 

12 

CD 

E2 

B6 

34 



B6AF 

34 

Fl 

C9 









EXXYXY 

B6B2 

3A 

35 

12 

A7 

C8 

CD 

BE 

B6 

CD 

BE 

065D 


B6BC 

B6 

C9 

3E 

58 

32 

34 

12 

CD 

E2 

B6 

1 1 OB 


B6C6 

CO 

34 

C9 









OFFS 

B6C9 

DD 

7E 

02 

A7 

F2 

D5 

B6 

CD 

A5 

B6 

1971 


B6D3 

ED 

44 

57 

3E 

9C 

32 

34 

12 

CD 

E2 



B6DD 

B6 

CD 

74 

BO 

C9 






n i / a 

SUCH 

B6E2 

01 

16 

00 

21 

12 

12 

3A 

34 

12 

ED 

16 A 


B6EC 

Bl 

2B 

C9 








24D8 
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23.8 Fehlermeldung 

Erreicht der Disassembler ein Byte, dessen Position keine Befehlsdeko¬ 
dierung zuläßt, wird eine Fehlermeldung ausgegeben und IX um eins 
erhöht Das undeutbare Byte wird an den Ausgabebereich angefugt so 
daß neben der Fehlermeldung z. B. für A3 ein -w» ausgegeben werden 
würde. Wenn in das Programm codierte Texte eingebettet sind wird das 
die Deutung erleichtern. Je nach verwendetem Druckcnnterface kon 

i 1 rv.OllCtTP OQl 


F'23.8.1 ( Pr ü-f summe? s 

B6EF 3B FEHLER 

B6F0 3B 

B6F1 211&B7 

B6F4 223112 

B6F7 CD66B5 

B6FA DD7E00 

B6FD FE20 

B6FF DA05B7 

B702 322012 

B705 C384B5 LFLH0: 


in B702, 

... B704 abstellen. 

0A20) 

: DEC 

SP 

DEC 

SP 

LD 

HL,TFEHL 

LD 

(MNEMAD),HL 

CALL 

BLTRAS 

LD 

A, (IX+00) 

CP 

20H 

JP 

C, LFEH0 

LD 

(ABER+20H),A 

JP 

XNKR1 


Prüfsumme (B000 


B707) 


3A138 


24 

Fünf Spiele und ein Rätsel 


Das vorliegende Buch soll eine Einführung in die Programmierung des 
Z80 sein und keine Programmsammlung. Dementsprechend lassen die 
folgenden Beispiele Algorithmen, Strategien und wenn möglich auch 
noch besondere Programmierkniffe erkennen. 


24.1 Master Mind 


Wir spielen nach folgenden Regeln: Die Grundmenge besteht aus den 
Zahlen 1, 2, ... 7. Der Computer -merkt» sich vier dieser Zahlen und 
Sie sollen erraten, besser: -logisch erschließen», welche vier Zahlen das 
sind und in welcher Reihenfolge sie stehen. Sie werden aufgefordert, 
Ihre Vermutung zu äußern. Nehmen wir an, der Computer habe sich 1, 
7, 4, 2 gemerkt, und Sie vermuten 2, 7, 5, 6. Dann sehen Sie auf dem 
Bildschirm 

Ihr Zug: 2756 ri: 2 ri + Pos.: 1 


was bedeutet: -Sie haben zwei Ziffern richtig vermutet (nämlich 2 und 
7); eine davon steht zudem an der richtigen Stelle». Nun können Sie 
aufgrund dieser Zwischenmcldung weiterraten. Sic haben sieben Versu¬ 
che, werden aber sicherlich diese Zahl nach Ihrem Geschmack vanie- 
ren können. 

Zunächst die Speicherdisposition (Arbeitsbereich)! 


1201... 1207 
1208 

1209... 120C 

120D 

120E 


Hier stehen die Hexcodes der Grundmenge, und hier 
werden sic permutiert. 

Hier werden die Schleifen eines Spiels gezählt. 
Hexcodes der vier eingegebenen Zahlen. 

Anzahl richtig+Position 
Anzahl richtig geratene Zahlen. 
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Wir besprechen das Programm wieder in Abschnitten: 

VORL setzt interne Abläufe auf Normalgeschwindigkeit zuruck. Sie 
wurden von dem vom Verfasser verwendeten Diskettensystem ver 

stellt. 

MAMI ist das Hauptprogramm.. 

INIT initialisiert den Arbeitsbereich. 

NEUSP steuert den Anfang einer neuen Spielrunde. 

TAU35 bewirkt 35mal den Austausch von je zwei Elementen der 
Grundmenge. Als Randomgenerator wird dabei das Refresh-Register 
verwendet, was eine sorgfältige Abstimmung der Parameter er orderte, 
um störende Synchronmen zu vermeiden (vgl. Abschnitt 16.8). 


P24. 1. 

VORL 

MAMI 

INIT 

NEUSP 

TAU35 

RND 


3FFB 3E 04 32 9E 
4000 CD 14 40 CD 
400A C4 40 CD 02 
4014 3E 31 06 07 
40IE 10 FB C9 
4021 11 SF 41 CD 
402B 17 21 00 D8 
4035 AF 32 OS 12 
4039 DD 21 00 12 
4043 53 40 32 5C 
404D 40 32 59 40 
4057 DD 72 00 DD 
406O C5 06 93 CB 
406A 07 28 F4 CI 


11 

21 40 CD 6F 40 CD 
41 CD 22 41 18 F2 
21 01 12 77 3C 23 

15 00 CD 06 00 3E 
06 0B 77 23 10 FC 

06 23 CD 60 40 32 
40 CD 60 40 32 56 
DD 56 00 DD 5E 00 
73 00 10 E0 c<? 

01 10 FC ED 5F E6 
C9 


05BB 
0B8F 
1037 
13F9 
1A27 
21FB 
2A0D 


Von den weiteren Programmabschnitten verdient PRUEF eine beson¬ 
dere Erwähnung. Nach Maßgabe der TabelleTVGL wird das .nritdem 
2 das 1. mit dem 3. usw. Element verglichen und auf Gleichheit 
geprüft. Dabei erledigt diese Routine zweierlei: Wenn V ^ BEF ^^ 
IC = INC E, dann werden richtige Positionen mitgczahl wenn NOP 
dann nicht. Wenn eine ..Vermutung- beurteilt werden soll, zeigt IY auf 
GRMENG-01 und IX auf EINGB4-01. Soll hingegen eine Emgabe aui 
doppelte Elemente geprüft werden, weisen beide Pointer auf E1NGB 

01 . 


P24.1.2 
406F CD0600 
4072 11AC41 
4075 CD 1500 


EINGABs CALL LETNL 

LD DE,TIHRZ 
CALL MSG 
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4078 210812 
407B 34 
407C 0604 
407E 23 
407F CD8C40 
4082 77 
40S3 CD9B40 
4086 10F6 
408B CDB740 
40SB C9 
408C CDB309 
408F CDCEOB 

4092 F5 

4093 CD12O0 

4096 Fl 

4097 C9 

4098 FE31 
409A FAA340 
409D FE38 
409F F2A340 
40A2 C9 
4098 FE31 
409A FAA340 
409D FE38 
409F F2A340 
40A2 C9 
40A3 119C41 
40A6 CD1500 
40A9 0610 
40AB CD3E0O 
40AE 10FB 
40BO 33 
40B1 33 
40B2 33 
40B3 33 
40B4 C30340 

4OB7 DD210812 
40BB CDC840 
40BE 7A 
40BF FE04 
40C1 C8 
40C2 1QDF 
40C4 DD21O012 
40C8 FD210812 
40CC 21&F41 
40CF AF 
4ODO 57 



LD 

HL,SCHLFZ 


INC 

(HL) 


LD 

B, 04 

LEINGO! 

: INC 

HL 


CALL 

. ASCIN 


LD 

(HL),A 


CALL 

EKONT 


DJ NZ 

LEINGO 


CALL 

RET 

GLCH? 

ASCINs 

CALL 

??KEY 


CALL 

?DACN 


PUSH 

AF 


CALL 

PRNT 


POP 

RET 

AF 

EKONT: 

CP 

31H 


JP 

M, EFEHL 


CP 

38 H 


JP 

RET 

P,EFEHL 

EKONT: 

CP 

31H 


JP 

M,EFEHL 


CP 

38H 


JP 

RET 

P,EFEHL 

EFEHL: 

LD 

DE,TEFEHL 


CALL 

MSG 


LD 

B, 10H 

LEFLOs 

CALL 

BELL 


DJNZ 

LEFLO 


INC 

SP 


INC 

SP 


INC 

SP 


INC 

SP 


JP 

MAMI+03 

GLCH7: 

LD 

IX,EINGB4—C 


CALL PRUEF+04 
LD A, D 
CP 04 
RET Z 
JR EFEHL 

PRUEFs LD IX,GRMENG-01 
LD l'V, EINGB4--01 
LD HL,TVGL 
XOR A 
LD D, A 


5 0A97 


; 1154 


5 1834 


; 1834 


; 1E02 


; 242A 
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40D1 5F 


40D2 

32004 1 


40D5 

O60C 


40D7 

CDED40 

LF’RO s 

4 ODA 

1OFB 


40DC 

3E1C 


4 ODE 

320O41 


40E1 

0604 


4 OE 3 

CDED40 

LF'Rl s 

4 OE 6 

1 OFB 


4 OE 8 

ED530D12 


4 OEC 

C9 


4 OED 

7E 

PRÜEF2: 

40EE 

32F940 


40F1 

23 


40F2 

7E 


40F3 

32FC40 


40F6 

23 


40F7 

DD7E00 

LP 21 s 

40FA 

FDBEOO 

j p p r?« 

40FD 

20O2 


4 OFF 

14 


4100 

IC 

VARBEF 

4101 

C9 

LP 23: 


LD 

E ? A 

LI) 

(VARBEF),A 

LD 

B, OCH 

CALL 

PRUEF2 

DJNZ 

LPRO 

L.D 

A, ICH 

LD 

(VARBEF), A 

LD 

B, 04 

CALL 

PRUEF2 

DJNZ 

L.PR1 

LD 

(RI&F’OS) , DE 

RET 


LD 

A„(HL) 

LD 

(LP21+02),A 

INC 

HL 

LD 

A,(HL) 

LD 

(LP22+02), A 

INC 

HL 

LD 

A,(IX+00) 

CP 

(i y-i-00) 

JR 

NZ J, LP23 

INC 

D 

INC 

E 

RET 



; 2B27 



Das übrige ist trivial, so daß ein Hexdump genügt. 


P24.1.3 

ANZEIG 4102 11 B6 41 CD 

410C 30 CD 12 00 

4116 3A 0D 12 F6 


15 

11 

30 


00 

BD 

CD 


3A 

41 

12 


0E 

CD 

00 


12 

15 

CD 


F6 

00 

06 


4120 00 C9 

GEWINN 4122 3A 0D 12 FE 04 28 08 3A 08 1^. 

412C FE 07 28 0F C9 _ 

SIEGM 4131 CD 06 00 11 CB 41 CD 15 00 CD 

413B 06 00 18 IE 

7L1G7" 413F CD 06 00 11 E8 41 CD 15 00 CD 

4149 06 00 11 FD 41 CD 15 00 06 04 

4153 21 01 12 7E CD 12 00 23 10 F9 

NELP 415D CD 06 00 11 14 42 CD 15 00 CD 

4167 B3 09 FE 0A CA 21 40 C7 

TvGL 416F 01 02 01 03 01 04 02 01 0^ 0- 

4179 02 04 03 01 03 02 03 04 04 01 

4183 04 02 04 03 01 01 02 02 03 03 

418D 04 04 


063A 

0A34 

0E18 

11F 0 

17ED 

1D93 

215D 

2191 
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TM AMI 

418F 

16 

4D 

Al 

A4 

96 

92 

9D 

20 

4D 

A6 

2619 


4199 

BO 

9C 

0D 









TEFEHL 

419C 

20 

45 

A6 

B0 

97 

Al 

9A 

92 

AA 

92 

2CCD 


41A6 

98 

B8 

92 

9D 

21 

OD 





TIHRZ 

41AC 

49 

98 

91) 

20 

5A 

A5 

97 

3A 

20 

0D 

3315 

TRI 

41B6 

20 

20 

9D 

A6 

3A 

20 

0D 





TRIP 

41BD 

20 

20 

9D 

A6 

2B 

50 

B7 

A4 

3A 

20 

38B2 


41C7 

0D 










TGRAT 

41 CS 

47 

9D 

Al 

96 

A5 

B8 

A6 

92 

9D 

92 

3E9E 


41D2 

2C 

20 

53 

A6 

92 

20 

98 

Al 

9A 

92 


41DC 

BO 

20 

97 

92 

A3 

B7 

BO 

B0 

92 

B0 

48EF 


41E6 

21 

0D 









TZUG7 

41E8 

44 

Al 

A4 

20 

A3 

Al 

9D 

92 

B0 

20 

4E09 


41F2 

37 

20 

56 

92 

9D 

A4 

A5 

9F 

98 

92 

TRICHT 

41 FC 
41 FD 

0D 

52 

A6 

9F 

98 

96 

A6 

97 

20 

A3 

BB 

5304 


4207 

9D 

92 

20 

97 

92 

A3 

92 

A4 

92 

B0 

5E17 


421 1 

3A 

20 

0D 








TNEUSP 

4214 

4E 

92 

A5 

92 

A4 

20 

53 

9E 

A6 

92 



421E 

B8 

3F 

20 

0D 







64A6 


Viel Spaß mit diesem Spiel! 


24.2 Leben 

Dieses Spiel ist in zweifacher Hinsicht kein Spiel: 

1. Es gibt einen Spieler, aber keinen Gegenspieler, keinen Sieger und 
keinen Verlierer. Man kann lediglich Figuren entwerfen und sie nach 
gewissen mathematischen Gesetzen verändern lassen; insofern handelt 
es sich um ein Grafikspiel. 

2. Hinter diesem Spiel verbirgt sich ein höchst aktuelles Existenzpro¬ 
blem der gesamten Menschheit: Ein Mensch allein hat auf Dauer 
gesehen nur ein begrenztes Leben; irgendwann wird er sterben. Zwei 
Menschen könnten den Bestand erhalten. Bei einer angemessenen 
Besiedelungsdichte könnte sogar eine Vermehrung erfolgen. 

Wird die Bevölkerungsdichte zu groß, so wird die Umwelt zerstört 
und die Bevölkerung geht schließlich zurück. 

Diese Grundgedanken reduzierte John Horton Conway um 1970 auf 
ein abstraktes mathematisches Modell: Die Individuen sind auf einem 
unendlichen Schachbrett angesiedelt, wobei jedes bis zu acht Nachbarn 
(auf benachbarten Feldern) haben kann. 
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Bei 0 oder 1 Nachbarn stirbt das Individuum an Vereinsamung. 

Bei zwei Nachbarn bleibt der Status quo erhalten: Hat ein unbesetz¬ 
tes Feld zwei Nachbarn, bleibt es unbesetzt; hat ein besetztes Feld zwei 

Nachbarn, bleibt es besetzt. 

Bei 3 Nachbarn ist das Optimum erreicht, und das Feld wird gegebe¬ 
nenfalls mit einem neuen Individuum besetzt. Von 4 Nachbarn an ist 
die Belastbarkeit der Umwelt überschritten. Ist ein solches Feld besetzt, 

stirbt sein Inhaber wegen Übervölkerung. 

Wir spielen auf den 1000 Feldern des Bildschirms, genauer: auf den 
918 Feldern D029... D3BE (BFELD). Wir machen diese Einschränkung, 
um im weiteren Verlauf nicht über den Bildschirmrand hinauszugrei- 
fen. Dabei stellen wir uns den Bildschirm als eine vertikale Rohre vor 
die durch Verkleben der beiden seitlichen Ränder entstand. Als Sym o 
für ein Individuum wählen wir den Buchstaben «X» mit dem Bild- 

schirmcode 18h. - , * 

Als zweiten Speicherbereich (NFELD), auf dem die Nachbarn eines 
jeden Feldes gezählt werden, benutzen wir A429... A7BE; somit lassen 
wir Platz für eventuelles Benutzen des EBS oder eines Disassemblers, z. 
B. zum Relokatieren zwecks Ausbau des Programms. Wir beabsichtigen 
folgende Bedienung des Programms: 

Zunächst wird - z. B. durch Reset - der Bildschirm möglichst frei 
gemacht. Dann zeichnet man mittels X und Cursorbewegungstasten 
eine Figur, bewegt den Cursor ein paar Zeilen tiefer und ruft mit J4000 
das Programm auf. 

Während man unter dem Aspekt der Ablaufgeschwindigkeit Master 
Mind sehr wohl auch hätte in BASIC abfassen können, wäre das hier 
geradezu qualvoll: Das erste Leben-Programm, das der Verfasser vor 
Jahren schrieb, benötigte zum Ausrechnen des neuen Bildes 60 Sekun¬ 
den und zu seiner Ausgabe weitere 20, also eine Wartezeit von 
Sekunden je Generation. Das folgende Maschinenprogramm liefert in 
1 s rund drei Bilder! Wer will, mag noch eine Verzögerung einbauen. 

Von einer kurzen Subroutine abgesehen, besteht das Programm nur 
aus einer einzigen endlosen Schleife. Zunächst muß NFELD auf null 
gesetzt werden: 
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Dann wird vom ersten bis zum letzten Feld von BFELD nach dem 
Schema 

IX-29 IX-28 IX—27 
IX-01 IX+01 

IX+27 IX+28 IX+29 (alles hexadezimal!) 

die Anzahl der Nachbarn ermittelt. Für jeden Nachbarn wird das 
entsprechende Byte von NFELD inkrementiert. 


P24 „ 2.? 


400D 

21 

29 

A4 

DD 

21 

29 

D0 

11 

BE 

A7 


4017 

3E 

18 

DD 

BE 

D7 

20 

01 

34 

DD 

BE 

0913 

4021 

D8 

20 

01 

34 

DD 

BE 

D9 

20 

01 

34 


402B 

DD 

BE 

FF 

20 

01 

34 

DD 

BE 

01 

20 

1 1B4 

4035 

01 

34 

DD 

BE 

27 

20 

01 

34 

DD 

BE 

403F 

28 

20 

01 

34 

DD 

BE 

29 

20 

01 

34 


4049 

CD 

7D 

40 

DD 

•*c. 

20 

C7 




1BA2 


Bei diesem Programmteil sollten Sie einmal überlegen, ob man nicht 
die achtfache Fleißwiederholung - z. B. mit einer Tabelle wie TVGL in 
P24.Lx - straffen könnte. Bedenken Sie dabei aber auch, daß dieser 
Abschnitt je Generation 918mal durchlaufen wird. Wie groß wäre etwa 
die zu erwartende Verlangsamung? 

Im folgenden werden je nach Anzahl der Nachbarn neue Individuen 
erzeugt oder vorhandene gelöscht. Zunächst wird durch Maskierung 
mit FC ermittelt, ob vier oder mehr Nachbarn vorhanden sind. Die 
anschließende Maskierung mit FE stellt dann fest, ob es 0, 1, 2 oder 3 
Nachbarn gibt. Bei weniger als zwei Nachbarn geht es zurück nach 
LAßII, und es wird gelöscht. Wenn aber XOR 03 drei Nachbarn 
ermittelt, wird ein X gesetzt. Bei zwei Nachbarn geschieht nichts. 


F'24.2.3 

SETZ 4050 21 29 A4 DD 21 29 DO 11 BE A7 

405A 7E E6 FC 28 06 

LABU 405F AF DD 77 00 18 0F 7E F6 FE 28 

4069 F5 7E EE 03 20 05 3E 18 DD 77 

4073 00 CD 7D 40 DD 23 20 DF 18 8 7 

ENDE? 407D E5 ED 52 El 23 C9 


06E9 
0FD0 
1 7E5 


Noch eine Bemerkung zur Subroutine ENDE?: Sie ermittelt, ob schon 
as ganze Feld durchlaufen wurde. Wenn das der Fall ist, wird Zero-Flag 
gesetzt und nach RET wenig später abgefragt. 
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Sie können das Spiel mit folgenden ..klassischen» Figuren beginnen: 


Ampel : 


Blinker: 

XX 


XXX 

X 

X 

XX 

Seg1 er: 


Pentadekathelon: 


X 

X X 


X X 

XX XXXX XX 


XX 

X x 


Bild 24.1 Einige klassische Figuren 


Es fasziniert nicht nur Sie, daß diese Figuren zu LEBEN beginnen. 
Erfinden Sie weitere! 


24.3 Schlingpflanzen 

Die beiden Spieler, Mensch und Computer, «laufen» auf dem Bild¬ 
schirm umeinander herum und ziehen lange Bänder hinter sich her. 
Beide Spieler dürfen weder gegeneinander noch gegen die ausgelegtcn 
Bänder stoßen. Für den Computer ist das kein Problem denn 
Geschwindigkeit ist keine Hexerei, schon gar nicht bei einem Maschi¬ 
nenprogramm! An das Reaktionsvermögen des Menschen werden 
jedoch - variabel - erhebliche Anforderungen gestellt. Er steuert den 

Weg seines Symbols mit den Cursorbewegungstasten. 

Das Programm ist als Improvisation entstanden und nicht modular 

aufgebaut. Sie könnten manches verbessern. , 

Nach den trivialen Anfangsjobs wird mit dem Symbol A3 (Bilü- 
schirmcode) der Rand markiert. So braucht nicht durch Auswertung der 
Position geprüft zu werden, ob ein Spieler den Rand überschreitet. 

Danach werden die Startorte beider Spieler mit deren Symbolen 
markiert und die DELTA-Werte für einen Schritt nach unten, oben, 
rechts und links in den Arbeitsbereich eingespeichert. 
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P24. 

1FFB 

1FFD 

2000 

2003 

2006 

2009 
200C 
200F 

2010 
201 1 
2012 
2015 
2018 
201B 
20 ID 
2020 
2022 
2026 
202A 
202E 


3. 1 
3E04 
329E11 
113321 
CD1500 
CD0600 
114421 
CD1500 
AF 
57 
5F 

CD3300 
CDB309 
320812 
3E16 
CD 1200 
0628 

DD2100D0 

FD21C0D3 

DD3600A3 

FD3600A3 


VORLs 

START: 


RAND: 


LR0: 


LD 

L.D 

LD 

CALL 

CALL 

LD 

CALL 

XÜR 

LD 

LD 

CALL 

CALL 

L.D 

LD 

CALL 

L.D 

LD 

LD 

LD 

LD 


A, 04 

(119EH), A 
DE,TSCHLI 
MSG 
LETNL 
DE,TSYMB 
MSB 
A 

D, A 

E, A 
TIMST 
77KEY 

( SYMBM),A 

A, 16H 
F'RNT 

B, 28H 

IX, OLIECK 

IY, ULIECK 

(IX+00),A3H 


2032 

DD23 


INC 

IX 

2034 

FD 2 3 


INC 

IY 

2036 

10F2 


DJNZ 

L.R0 

2038 

0619 


LD 

B, 19H 

2 0 A 

DD2100D0 


LD 

IX,OL IECK 

203E 

DD3600A3 

LRl : 

LD 

(IX+00) ,A3H 

2042 

DD3627A3 


LD 

(IX+27H) , A3I 

2046 

112800 


LD 

DE,0028H 

2049 

DD 1 9 


ADD 

I X, DE 

204B 

10F1 


DJNZ 

LRl 

204D 

DD21FCD1 

STMECO: 

L.D 

IX,STARTM 

2051 

3A0S12 


LD 

A,(SYMBM) 

2054 

DD7700 


LD 

(IX+00),A 

2057 

FD21EAD1 


LD 

IY,STARTC 

205B 

FD360043 


LD 

(IY+00),43H 

205F 

112800 


LD 

DE,0028H 

2062 

ED530012 


L.D 

(DELTAU),DE 

2066 

11D8FF 


LD 

DE,FFD8H 

2069 

ED530212 


LD 

(DELTAG),DE 

206D 

110100 


LD 

DE,0001 

2070 

ED530412 


LD 

(DELTAR),DE 

2074 

11FFFF 


LD 

DE, FFFFIH 

2077 

EDS30612 


LD 

(DELTAL),DE 

207B 

ED530912 


LD 

(AKTÜFF),DE 


5 012 ^ 


; 0A02 


5 1D0D 


; 30C0 


199 


200 
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In der Randomroutine wird durch geeignete Maskierung eine der Zah¬ 
len 0, 2, 4, 6 gewonnen und in LOOP+02 in das Programm eingesetzt. 

In ALTCPS wird die alte Computerposition auf den Stapel gerettet, 
denn es könnte sein, daß die neu berechnete nicht zulässig ist. Dann 
wird geprüft, ob eins der vier Nachbarfelder frei ist. Wenn ja, dann 
weiter bei NEUCPS; wenn nein, dann Text «Ich kann nicht ziehen» 
und weiter bei NEUSP. 

NEUCPS berechnet aus der derzeitigen Computerposition in IY und 
der momentanen Random-Schrittrichtung in DE eine neue Position. Ist 
dieses Feld frei, dann weiter bei FELDFR, anderenfalls alte Position 
vom Stapel holen und zurück nach RND. 

Im Verlauf von FELDFR bestimmt eine Wartcroutine das Spieltempo. 
Anschließend wird geprüft, ob der Mensch eine neue Richtung eingab. 


P24.3 
207F 

2 

3A05E0 

RND: 

LD 

A,(E005H) 

2082 

E606 


AND 

06 

2084 

328920 


L.D 

(AKDELT+02) 

2087 

ED5B0O12 

AKDELT: 

LD 

DE,(1200H) 

208B 

FDE5 

ALTCPS: 

PUSH 

IY 

208D 

FD7ED8 


L_D 

A,(IY-28H) 

2090 

A7 


AND 

A 

2091 

281A 


JR 

Z„NEUCPS 

2093 

FD7EFF 


LD 

A, (IY-01) 

2096 

A7 


AND 

A 

2097 

2814 


JR 

Z,NEUCPS 

2099 

FD7E01 


L.D 

A,(IY+01) 

209C 

A7 


AND 

A 

209D 

280E 


JR 

Z,NEUCPS 

209F 

FD7E28 


L.D 

A,(IY+28H) 

20A2 

A7 


AND 

A 

20A3 

2808 


JR 

Z,NEUCPS 

20A5 

115121 


LD 

DE,TKANNI 

20A8 

CD1500 


CALL 

MSG 

20AB 

1848 


JR 

NEUSP 

20AD 

FD 19 

NEUCPS: 

ADD 

IY, DE 

20AF 

FD7E00 


L.D 

A,(IY+O0) 

20B2 

A7 


AND 

A 

20B3 

2804 


JR 

Z,FELDFR 

20B5 

FDE1 


POP 

IY 

20B7 

18C6 


JR 

RND 

20B9 

3 . 2% 

FELDFR: 

INC 

SP 

20 BA 

-?T 


INC 

SP 
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20BB FD360043 

20BF 3E38 

20C1 CD1721 

20C4 CD1B00 

20C7 A7 

20C8 2810 

2©CA 3D 

20CB CB27 

20CD E606 

20CF 32D420 

20D2 EDSB0012 LFFR0: 

20D6 ED530912 


LD (IY+00),43H 
LD A,DELAY 
CALL WARTE2 
CALL GETKY 
AND A 

JR Z,NSCHRM 
DEC A 
SLA A 
AND 06 

LD (LFFR0+02),A 
LD DE,(1200H) 

LD (AK'TOFF) , DE 


Der Rest bedarf wohl keiner weiteren Erklärung: 


P24. 
20DA 
20DE 
20E0 
20E3 
20E4 
20E6 
20E9 
20EC 
20EF 
20F2 
20F5 
20F7 
20FA 
20FC 
20FF 
2102 
2105 
2108 
210A 
210D 
21 OE 
2111 
2114 


>. Ni 

ED5B091: 
DD19 
DD7E00 
A7 

2828 

116721 

CD1500 

CD0600 

117821 

CD1500 

060A 

CD3E00 

10FB 

CD0600 

118C21 

CD1500 

CDB309 

FE0A 

CA0O20 

C7 

3A0812 

DD7700 


NSCHRM; 


NEUSF': 

LNSP0: 


fldfr: 


C38720 


Weiter als Hexdumpi 


LD DE,(AKTOFF) 
ADD IX,DE 
LD A,(IX+00) 
AND A 

JR Z,FLDFR2 
LD DE,TKRACH 
CALL MSG 
CALL LETNL 
LD DE,TVERL 
CALL MSG 
LD B,0AH 
CALL BELL 
DJNZ LNSP0 
CALL LETNL 
LD DE,TNEUSP 
CALL MSG 
CALL ??KEY 
CP 0AH 
JP Z,START 
RST 00 
LD A,(SYMBM) 

LD (IX +00),A 

JP AKDELT 


WARTE2 2117 F5 F5 F5 Fl 3D F5 20 FB Fl Fl 

pH n 5 20 F4 F1 F1 F1 30 F5 

212B F5 2o EB Fl Fl Fl C9 

rSCHLI 210.3 16 53 9F 98 B8 A6 BO 97 9E AA 

213D BS Al BO A2 92 BO OD 


5 2437 


5 07A3 


r J •' 

5 1472 

0F3F 

1 BSD 
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TSYMB 

TKANNI 

TKRACH 

TVERL 

TNEUSP 


2144 

214E 

2151 

215B 

2165 

2167 

2171 

217B 

21B2 

218C 

2196 


49 98 
3A 20 
49 9F 
A6 9F 
B0 0D 
45 A4 
9D Al 
53 A6 
AB 92 
4E 92 
B8 3F 


OD 


9F 9B 96 


BD 

B3 

9A 

B7 

B8 

24C1 

Al 

BO 

BO 

20 

BO 

2A42 

A2 

A6 

92 

98 

92 






3096 

96 

20 

97 

92 

A9 


21 

0D 




3899 

Al 

9A 

92 

BO 

20 


9D 

92 

BO 

21 

OD 

4 2 CF 

20 

53 

9E 

A6 

92 


2F 

4E 

29 

20 

OD 

4A2F 


24.4 Mikromühle 

An diesem Spiel sollen die Grundzüge einer etwas anspruchsvolleren 

Strategie aufgezeigt werden. „ . „ (Hi1 , 949 , werden 

Die neun Felder des quadratischen Spielbretts (Bild 24.2) werden 
abwechselnd besetzt; der Mensch beginnt - der Computer zieht nac v 
Besetzte Felder dürfen nicht noch einmal besetzt werden, auch werden 
kerne Steine weggenommen. Gewonnen hat, wer als ^erdre^- 
in gerader Linie plaziert: in einer Zeile, in einer Spalte oder in einer 

“taTem wird der Zus.and der neun Spielfelder als Feldwert FW|,| 
dargestellt: FW(4) = 1 bedeutet, daß Feld 4 unbesetzt ist, FW( ) g 



Bild 24.2 Mikromühle, Spielfeld und Numerierung der Mühlen 
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an, daß Feld 5 vom Menschen besetzt ist, und FW(6) = 3 verrät, daß Feld 
6 vom Computer belegt wurde. 

Nach jedem Zug werden die Mühlcnprodukte MP(i) berechnet, die 
Produkte der zu einer Mühle gehörenden Feldwerte. Dabei können sich 
nur die Produkte 1, 2, 3, 4, 6, 8, 9, 12, 18, 27 ergeben, die Auskunft über 
die Gewinnchancen, aber auch Gefahren auf den acht Mühlen geben: 

MP(i) = 4 besagt, daß zwei Felder der i-ten Mühle vom Menschen 
besetzt sind, während das dritte noch frei ist. Hier ist zu befürchten, daß 
der Mensch beim nächsten Zuge die Mühle schließt und damit 
gewinnt. Es besteht also eine hohe Dringlichkeit, das freie Feld zu 
besetzen. 

MP(j) = 9 besagt, daß die entsprechende Chance für den Computer 
besteht. Natürlich soll er trotz der Gefahr auf Feld i den Sieg vorziehen. 

Diese Überlegungen führen dazu, den acht Mühleprodukten acht 
Spielwertc SW(i) zuzuordnen, um dadurch schnell die größte Dringlich¬ 
keit zu finden: 

MP = 1 2 3 4 5 6 7 12 18 27 
SW = 4367298 1 1 10 

Der Computer ermittelt nach jedem Zug für alle freien Felder das 
Maximum der Spielwerte der durch sie verlaufenden Mühlen und 
merkt sich zum momentanen Maximum den zugehörigen aktuellen 
Zug AZ, wobei ZX die Nummer des gerade geprüften Zuges ist. Der 
Suchlauf beginnt mit Feld 5, weil durch dieses die meisten Mühlen 
verlaufen. 

Um Platz zu sparen, teilen wir das Programm in Disk-BASIC mit. Die 
vierstelligen Zahlen vor den Programmzcilcn gehören natürlich nicht 
mit zum D-BASIC-Programm, sondern beziehen sich auf die State¬ 
ments des Maschinenprogramms, das nur als Hexdump abgedruckt 
wird; Sie können es ja ohne Schwierigkeiten disasscmblieren. - Das 
EBS wird zu diesem Programm nicht benötigt. 

F'24.4. 1 

100 REM »iM#*#**^^****##*#*****#******#****## 

101 REM ** M I K R 0 M U E H L E ** 

102 REM ## MZ700D-BASIC V.04KP (DISK BASIC) ** 

103 REM *####*#*#*#*#*#*#*<*****#************#* 

104 DIM SAD (9) , F r W (9) , MP (8) , PS (27) , SW (8) : G0T0234 
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40OO 105 GOSUB 113 :REM SPILF 
4003 106 GÜSUB 120 s REM INIT 
4006 107 GOSUB 125 s REM ZLJGM 
4009 108 GOSUB 172 :REM VALZUG 
4000 109 GOSUB 192 :REM ZUGC 
400F HO GOSUB 172 : REM VALZUG 
4012 111 GOTO 107 
112 : 

113 REM SPIeLFeld zeichnen 
401B 114 CLS 

4020 115 PRINT TI*;: PRINT TT*: PRINT T2* 

4032 116 PRINT TI* : PRINT T3*: PRINT TI* 

4044 117 PRINT T4* : PRINT TI*: PRINT 

4053 118 RETURN 

119 : 

120 REM INITiieren An-fangswerte 

4054 121 FOR B=1 TO 9: FW(B>=1: NEXT B 

4054 122 FOR B=1 TO 8: MP(B)=1: NEXT B 

405E 123 RETURN 

124 : 

125 REM ZUGMensch 
405F 126 PRINT IZ* 

4065 127 GET Z*: IF Z*="" THEN 127 

4068 128 IF ASC(Z*) < *31 THEN 125 

406D 129 IF ASC(Z*) > *39 THEN 125 

4072 130 PRINT Z* 

407D 131 AZ-ASC(Z*)-*30 
4082 132 GOSUB 137 :REM FFR? 

40A6 133 IF FF=1 THEN 125 

4085 134 FK=2: SV==*D: GOSUB 141 : REM SETZUG 

4092 135 RETURN 

136 : 

137 REM FeldFRei? 

4093 138 IF FW(AZ)=1 THEN FF=0: RETURN 
4OA0 139 PRINT SB*: FF«1: RETURN 

140 : 

141 REM SETZUG 
40AA 142 FW(AZ > =FK 

40BA 143 GOSUB 151: REM MUL 
40BD 144 GOSUB 169: REM SETSAD 
40CO 145 POKE ASAD,SY 
40C7 146 RETURN 

147 : 

148 REM MIJL2 

40C8 149 MP<M)=MP(M)*FK: RETURN 

150 : 

151 REM MULtiplizieren 

40D7 152 ON AZ GOTO 154, 156, 157, 159, 160, 162, 

163, 165, 166 

4OFF 153 END 
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41OO 

154 

M==l: 

GOSUB 

148: 

M=5: 

GOSUB 

148 

4 IOC 

155 

M=8: 

GOSUB 

148: 




4113 

156 

M=2: 

GOSUB 

148: 

M=5: 

GOSUB 

148 

4120 

157 

M=3: 

GOSUB 

148: 

M=4: 

GOSUB 

148 

412C 

158 

M=5: 

GOSUB 

148: 




4133 

159 

M= 1: 

GOSUB 

148: 

M=6: 

GOSUB 

148 

4140 

160 

M=2: 

GOSUB 

148: 

M=4: 

GOSUB 

148 

414C 

161 

M==6: 

GOSUB 

148: 

M=8: 

GOSUB 

148: 

4159 

162 

M : =3: 

GOSUB 

148: 

M=6: 

GOSUB 

148; 

4166 

163 

M=l: 

GOSUB 

148: 

M=4: 

GOSUB 

148 

4172 

164 

M=7: 

GOSUB 

148: 




4179 

165 

M=2: 

GOSUB 

148: 

M=7: 

GOSUB 

148: 

4186 

166 

M=3: 

GOSUB 

148: 

M=7: 

GOSUB 

148 

4192 

167 

M=8: 

GOSUB 

148: 





REM SETzeScreenADresse 
ASAD=SAD(AZ): RETURN 

REM VALZUG von MP nach SW 
FÜR B~1 Tü 8: SW<B>=PS(MP(B>> 
GOSUB 177: REM BEWERT 
RETURN 


RETURN 

RETURN 

RETURN 

RETURN 

RETURN 

RETURN 

RETURN 

RETURN 

RETURN 


NEXT B 


REM BEWERT© den Spielstand 
MW=1 

FÜR B=1 TG 8 

IF SW(B)>MW THEN MW=SW(B) 

NEXT B 

IF MW<3 THEN PRINT UN$: GOTO 186 

IF MW=9 THEN PRINT GR$: PRINT SG*: GOTO 186 

IF MW=ltf1HEN PRINT IG*: GOTO 186 

RETURN 

REM NEUes SPiel^ 

PRINT NS*; 

GET A*: l'F A*~"" THEN 188 
IF A*~"J" THEN CLR: RUN 
END 


REM ZUGComputer 
GOSUB 197: REM ZUGC? 
FK-3: SV-3: GOSUB 141: 
RETURN 


REM SETZUG 


REM ZUGC" 


4238 198 
4245 199 
424E 200 
4255 201 
425F 202 
4264 203 
4269 204 


IF FW(5)=1 THEN AZ=5: RETURN 

M W=1 : REM MW = MAXSPW 

IF FW(1)>1 THEN 204 

ZX=1: PM=1: GOSUB 230: REM ZUGC2 

s PM~2: GOSUB 230 

: PM=8: GOSUB 230 

IF FW(2)>1 THEN 207 
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4270 205 ZX-2: PM=2s GOSUB 230 
427A 206 : PN-5: GOSUB 230 

427F 207 IF FW(3)>1 THEN 211 
4286 208 ZX=3: PN=3: GOSUB 230 
4290 209 : PM=4s GOSUB 230 

4295 210 s PM=5: GOSUE« 230 

429A 211 IF FW(4)>1 THEN 214 
42A1 212 ZX=4s PN~1: GOSUB 230 

42AB 213 s PM"6s GOSUB 230 

42B0 214 IF FW(6)>1 THEN 217 
42B7 215 ZX=6s PN=3: GOSUB 230 

4201 216 : PM-6: GOSUB 230 

4206 217 IF FW< 7) >1 THEN 221 
42CD 218 ZX=7s PN=1: GOSUB 230 

42D7 219 : PN=4s GOSUB 230 

42DC 220 : PN—7s GOSUB 230 

42E1 221 IF FW(8)>1 THEN 224 
42E8 222 ZX»8s PN=2: GOSUB 230 

42F2 223 s PN=7s GOSUB 230 

42F7 224 IF FW(9)>1 THEN 228 
42FE 225 ZX=9s PN=3: GOSUB 230 

4308 226 s PM-7: GOSUB 230 

430D 227 s PN=8s GOSUB 230 

4312 228 RETURN 

229 s 

230 REN ZUGC2 

4313 231 IF SW (PN) >MW THEN NW~SW(PN)s AZ--ZX 
4320 232 RETURN 


4321) 
433A 
4342 
434A 
4352 
435A 
4364 
4374 
438B 
4397 
43AB 
43BE 
4300 
43D1 
43DD 
43E7 
43ED 
43F3 


234 

235 

236 

237 

238 

239 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 

250 

251 


TT$=" Nikromühle" 
Tl$="+-+-+~+" 

T2*="!1!2!3!" 

T3$~"!4!5!6!" 

T4$ : - " ! 7 ! 8 ! 9 ! " 

IZ$~"Ihr Zug? " 

SB$="schon besetzt!" 
UN$="Da5 war unentschieden. 
6R$~"Grat.ul i ere, " 

SG$~"Sie haben gewonnen." 

IG$="Ich habe gewonnen." 
NS*="Neues Spiel? " 

PS< l)=4s PS( 2)« 3s PS<3>« 
PS( 6) = : 2: PS ( 8) ~ 9s PS<9) = 
PS(18)=1s PS(27)=10 
BAD(1)=*D029 b SAD(2)=*D02Bs 
SAD(4)~$D079s SAD(5)=$D07Bs 
BAD(7)~$D0C9 s SAD(8)=$DOCB s 
GOTO 105 


PS( 4)=7 
PS (12) =«=1 


SAD(3)=$D02D 
SAD <6) =$D07D 
SAD(9)=$DOCD 
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Und dazu der unstrukturierte Hexdump: 

4600 CD iß 40 CD 54 40 CD 5F 40 CD B5 41 CD 29 42 CD B5 41 18 F2 

4014 CD 15 00 CD B6 00 C9 3E 16 CD 12 00 11 3A 43 CD 15 00 11 2D ;0F1C 

4028 43 CD 14 40 11 42 43 CD 14 40 11 3A 43 CD 14 40 11 4A 43 CD 

403C 14 40 11 3A 43 CD 14 40 11 52 43 CD 14 40 11 3A 43 CD 14 40 ;1ACA 

4050 CD 06 00 C9 06 11 21 00 12 36 01 23 10 FB C9 11 5A 43 CD 15 

4064 00 CD B3 09 FE 21 FA 5F 40 FE 2A F2 5F 40 CD CE 0B F5 CD 12 -2AE2 

4078 00 CD 06 00 Fl E6 BF 32 ID 12 CD 93 40 3E 02 32 1B 12 3E 0D ’ 

408C 32 IC 12 CD AA 40 C9 DD 21 FF 11 32 9C 40 DD 7E 04 FE 01 C8 ;39AB 

40A0 11 64 43 CD 14 40 33 33 18 B5 3A ID 12 DD 21 FF 11 32 B9 40 

40B4 3A 1B 12 DD 77 04 CD D7 40 CD 99 41 2A IE 12 3A IC 12 77 C9 -47A2 

40C8 46 48 CB 20 3A 1B 12 FE 02 78 28 01 81 77 C9 3A ID 12 FE 01 ' 

40DC 28 22 FE 02 28 31 FE 03 28 3A FE 04 28 49 FE 05 28 52 FE 06 -5546 

40F0 28 67 FE 07 28 70 FE 08 28 7F FE 09 CA 86 41 76 21 09 12 CD 

4104 CB 40 21 0D 12 CD C8 40 21 10 12 CD C8 40 C9 21 0A 12 CD C8 ;6506 

4118 40 21 0D 12 CD C8 40 C9 21 0B 12 CD C8 40 21 0C 12 CD C8 40 

412C 21 0D 12 CD CB 40 C9 21 09 12 CD C8 40 21 0E 12 CD C8 40 C9 ;7419 

4140 21 0A 12 CD C8 40 21 0C 12 CD C8 40 21 0E 12 CD C8 40 21 10 

4154 12 CD C8 40 C9 21 08 12 CD CB 40 21 0E 12 CD C8 40 C9 21 09 •8545 

4168 12 CD C8 40 21 0C 12 CD CB 40 21 BF 12 CD C8 40 C9 21 0A 12 

417C CD C8 40 21 0F 12 CD CB 40 C9 21 0B 12 CD C8 40 21 0F 12 CD ;9141 

4190 C8 40 21 10 12 CD CB 40 C9 3A ID 12 3D CB 27 32 AB 41 32 B8 

41 A4 41 DD 21 E7 43 DD 6E 06 DD 23 DD 66 06 22 IE 12 C9 06 08 21 ;A00F 

41B8 09 12 DD 21 CB 43 11 11 12 7E 32 C7 41 DD 7E BC 12 23 13 1B 

41CC F4 CD Dl 41 C9 3E 01 32 19 12 06 08 21 11 12 3A 19 12 BE 30 ;ABBE 

41EB @4 7E 32 19 12 23 1B F3 3A 19 12 FE B3 38 09 FE 09 28 BD FE 

41F4 BA 28 17 C9 11 74 43 CD 14 4B 18 14 11 8B 43 CD 14 40 11 97 ;B773 

42BB 43 CD 14 40 18 B6 11 AB 43 CD 14 40 11 BE 43 CD 15 BB CD B3 

421C 09 FE 0A 28 Bl C7 33 33 33 33 C3 00 4B CD 38 42 3E 03 32 1B ;C42E 

4230 12 32 IC 12 CD AA 40 C9 3A B4 12 FE Bl 20 06 3E B5 32 ID 12 

4244 C9 3£ 01 32 19 12 DD 21 10 12 3A 00 12 FE Bl 2B 14 3E Bl 32 (CDAE 

4258 1A 12 3E Bl CD 13 43 3E B5 CD 13 43 3E 08 CD 13 43 3A Bl 12 

4260 FE 01 20 BF 3E 02 32 1A 12 3E B2 CD 13 43 3E B5 CD 13 43 3A ;D727 

42BB B2 12 FE 61 2B 14 3E @3 32 1A 12 3E B3 CD 13 43 3E B4 CD 13 

4294 43 3E B5 CD 13 43 3A 03 12 FE 01 2B 0F 3E 04 32 1A 12 3E Bi ;DF98 

42A8 CD 13 43 3E B6 CD 13 43 3A 05 12 FE Bl 2B 0F 3E 06 32 1A 12 

42BC 3E B3 CD 13 43 3E 06 CD 13 43 3A B6 12 FE 01 20 14 3E 07 32 ;E90A 
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42D« 1A 12 3E 81 CD 13 43 3E 84 CD 13 43 3E 67 CD 13 43 3A 67 12 
42E4 FE 81 28 8F 3E 88 32 1A 12 3E 82 CD 13 43 3E 87 CD 1-' 43 jA 
42F8 88 12 FE 81 28 14 3E 89 32 1A 12 3E 83 CD 13 4o 3E 87 CD 13 
438C 43 3E 88 CD 13 43 C9 32 IE 43 32 22 43 3A 19 12 DD BE 86 D8 
4328 DD 7E 66 32 19 12 3A 1A 12 32 ID 12 C9 28 26 4D A6 A9 9D B7 
4334 B3 AD 98 B8 92 8D 2B 2D 2B 2D 2B 2D 2B 8D 21 31 21 32 21 33 
4348 21 8D 21 34 21 35 21 36 21 8D 21 37 21 38 21 39 21 8D 49 98 
435C 90 28 5A A5 97 3F 28 8D A4 9F 98 B7 B8 26 9A 92 A4 92 96 A2 
4378 96 21 28 8D 44 Al A4 28 A3 Al 9D 28 A5 B8 92 B8 96 A4 9F 98 
4384 A6 92 9C 92 B8 2E 8D 47 9D Al 96 A5 B8 A6 92 9D 92 2C 8D 53 
4398 A6 92 28 98 Al 9A 92 B8 28 97 92 A3 B7 B8 B6 92 B6 21 8D 49 
43AC 9F 98 28 98 Al 9A 92 28 97 92 A3 B7 B8 B8 92 88 2E 8D 4E 92 
43C8 A5 92 A4 26 53 9E A6 92 BB 3F 28 8D 84 83 66 67 88 82 88 89 
43D4 88 68 88 81 86 86 66 88 88 81 88 88 88 88 88 88 66 68 8A 29 
43E8 D8 2B D8 2D D8 79 D8 7B D8 7D D8 C9 D8 CB D8 CD D8 


;F2BF 

; FD7F 

; 8985 

; 16B8 

;2A8A 

; 3E4F 

;43F3 
; 4F6D 


24.5 Raummühle 

Dieses schöne Spiel benutzt als Spielfeld einen Würfel, der in 4 * 4 * 4 
= 64 Teilwürfel unterteilt ist. Diese werden von Mensch und Compu¬ 
ter abwechselnd besetzt mit dem Ziel, vier Steine in gerader Linie zu 
setzen, sei es von links nach rechts in einer Zeile, sei es von hinten 
oben-links nach vorn-unten-rechts in einer Raumdiagonale usw. Die 
Strategie ist eine konsequente Fortführung von Spiel 24.2 und recht 
stark. 

Es wird empfohlen, den Hexdump genau zu analysieren: Das Spiel 
wurde aufwendig ausgearbeitet und trickreich gestaltet. 

1. Der Monitor wird aus dem ROM ins RAM verlagert und dort so 
verändert, daß das hier störende Scrolling auf den unteren Teil des 
Bildschirms begrenzt wurde. 

2. Das Programm enthält einen Kopierschutz. Saven Sie es, bevor Sie es 
starten! Startadresse ist 4050. Zum Tüfteln können Sie (4036) — 11 
durch C9 ersetzen... 



Fünf Spiele und ein Rätsel 


400« 21 0« 0« 11 0« 2« 01 «0 10 E5 C5 05 ED BO El CI 01 03 E0 ED 

4014 B0 21 22 40 11 60 0E 01 14 0« ED B0 18 14 @1 68 01 11 58 02 

4028 21 8« 02 C5 ED B« CI D5 11 58 DA 21 80 DA 01 3E 00 21 3E 4« 

403C 11 3D 40 ED B8 21 3F 40 36 00 23 36 00 23 36 00 23 36 00 C9 

4050 CD OO 40 CD 6E 40 CD 07 40 CD F5 40 CD 13 43 CD 00 41 CD 18 

4064 43 18 F2 CD 15 @0 CD 06 00 C9 11 B7 43 CD 67 40 CD 06 00 11 

4078 00 43 CD 67 40 11 F6 43 CD 67 4« 3E 31 CD 12 00 11 68 44 CD 

40BC 67 40 11 ID 44 CD 67 40 3E 32 CD 12 00 11 6B 44 CD 67 40 11 

40A0 ID 44 CD 67 40 3E 33 CD 12 00 11 6B 44 CD 67 40 11 ID 44 CD 

40B4 67 40 3E 34 CD 12 00 11 6B 44 CD 67 40 11 44 44 CD 67 40 11 

40C8 91 44 CD 67 40 CD 06 00 11 B7 44 CD 67 40 C9 06 8D 21 01 12 

40DC 36 01 23 10 FB 06 40 11 4B 45 1A 6F 13 1A 67 13 36 00 CB DC 

40F0 36 71 10 F2 C9 11 C5 44 CD 15 @0 CD 3E 00 3E 02 32 IE 13 3E 

4104 0D .'2 1F 13 21 00 12 36 00 CD 6C 41 CD 6C 41 CD 6C 41 7E 32 

4118 20 13 CD 06 00 CD 21 41 C9 CD 51 41 3A 20 13 32 33 41 DD 21 

412C 01 12 3A IE 13 DD 77 01 2A 21 13 7E A7 20 OB 3A 1F 13 77 CD 

4140 84 43 CD 9F 41 C9 11 DB 44 CD 67 40 33 33 C3 F5 40 3A 20 13 

4154 CB 27 32 62 41 32 67 41 DD 21 4B 45 DD 6E 04 DD 23 DD 66 04 

4168 22 21 13 C9 CD B3 09 FE 21 FA 97 41 FE 25 F2 97 41 CD CE OB 

417C F5 CD 12 00 Fl 3D CB 27 CB 27 CB 27 CB 27 CB 27 CB 27 CB 27 

4190 CB 16 CB 27 CB 16 C9 33 33 CD 06 00 C3 F5 40 11 CB 45 3A 20 

41A4 13 6F 26 OO 29 29 29 19 06 @8 7E CD B6 41 23 IO F9 C9 E5 C5 

41B8 11 41 12 6F 26 00 19 3A IE 13 47 AF 86 10 FD 77 CI El 3E 24 

41CC 32 8D 12 C9 3E 03 32 1F 13 32 IE 13 CD EB 41 CD IC 42 CD 58 

41E0 42 CD BA 42 CD EA 42 CD 21 41 C9 DD 21 41 12 FD 21 8E 12 «6 

41F4 4C DD 7E OO CD 09 42 FD 77 00 DD 23 FD 23 10 Fl FD 36 OO Ol 

420B C9 C5 06 0F 21 FB 48 BE 28 06 23 23 10 F9 CI C9 23 7E CI C9 

421C 21 CB 45 06 40 DD 21 DB 12 AF 32 1B 13 CD 37 42 3A 1B 13 DD 

4230 77 0O DD 23 10 EF C9 C5 06 08 FD 21 8E 12 7E 32 4A 42 32 4F 

4244 42 3A 1B 13 FD BE 4C 30 06 FD 7E 4C 32 1B 13 23 IO E8 CI C9 

4258 DD 21 DB 12 AF 32 IC 13 06 40 3A IC 13 32 76 42 32 84 42 AF 

426C 32 23 13 CD 8F 42 3A 23 13 FE 02 38 OC DD 7E 3F FE 08 30 05 

4280 3E 08 DD 77 3F 3A IC 13 3C 32 IC 13 10 D4 C9 C5 FD 21 41 12 

4294 11 CB 45 3A IC 13 6F 26 0O 29 29 29 19 06 08 7E 32 A9 42 FD 

42A8 7E 4C FE 04 20 07 3A 23 13 3C 32 23 13 23 10 EB CI C9 AF 32 

42BC 1B 13 32 IC 13 21 DB 12 06 40 OE OO DD 21 01 12 79 32 D2 42 

42D0 DD 7E 3F FE Ol 20 OE 3A 1B 13 BE 30 08 79 32 IC 13 7E 32 1B 


209 

; 00ED4 

J01CB8 

;02E3F 

;03C80 

;64962 

;055E7 

;06239 

;06DD8 

;07E49 

; 09215 

;«A168 

I0AED5 

;0C06E 

;0DO61 

J0DFA1 

;0EC70 

;0F88B 

;103DC 


210 


Fünf Spiele und ein Rätsel 


42E4 13 0C 23 10 E3 C9 11 DÖ 44 CD 15 60 3A IC 13 32 20 13 21 IC ;18EB6 

42F8 13 CB 86 CB 06 CD 0A 43 CD 0A 43 CD 0A 43 CD 06 00 C9 CB 06 

430C CB 06 7E E6 03 3C F6 30 CD 12 00 C9 CD EB 41 AF 4F 32 ID 13 ;11EC1 

4320 32 1B 13 06 4C 21 8E 12 3A 1B 13 BE 30 88 79 32 ID 13 7E 32 

4334 1B 13 8C 23 18 EE 3A 1B 13 FE 03 38 09 FE 0B 28 10 FE 8C 28 -,12895 

4348 14 C9 11 26 45 CD 67 40 CD 77 43 18 10 CD 98 43 11 F3 44 18 

435C FO CD 9B 43 11 13 45 18 E8 11 3D 45 CD 67 40 CD B3 09 FE 0A ;138B8 

4370 C2 00 00 Dl C3 56 48 CD 3E 00 CD 3E 00 CD 3E 08 CD 3E 80 C9 

4384 86 18 3E 66 CB DC AE 77 CB 9C C5 81 FF 4F 8B 78 A7 28 FB CI ;14AA6 

4398 10 EC C9 11 CB 47 3A ID 13 6F 26 08 29 29 19 86 84 E5 7E CD 

43AC 54 41 CB DC 36 17 El 23 10 F3 C9 16 28 28 28 28 28 20 52 28 ;157CD 

43C8 Al 28 A5 28 B3 28 B3 28 AD 28 98 28 B8 28 92 8D 20 20 28 31 

4304 2E 45 9A 92 B8 92 20 20 32 2E 45 9A 92 B0 92 20 28 33 2E 45 ;165A8 

43E8 9A 92 80 92 20 28 34 2E 45 9A 92 B8 92 8D 28 20 D0 E8 D2 E8 

43FC D2 E8 D2 E0 CE D8 E0 D2 E8 D2 E0 D2 E0 CE D0 E0 D2 E8 D2 E8 ;17FEC 

4418 D2 E0 CE D8 E8 D2 E8 D2 E8 D2 E8 CE 8D 20 20 CB E8 81 E0 81 

4424 E0 81 E8 D3 CB E8 81 E8 81 E8 81 E@ D3 CB E0 Bl E8 81 E0 81 ;19C7D 

4438 E8 D3 CB E0 81 E8 Bl E0 81 E8 D3 8D 28 20 CD E8 Dl E8 Dl E0 

444C Dl E0 DD CD E0 Dl E0 Dl E0 Dl E8 DD CD E8 Dl E8 Dl E8 Dl E0 ;1BB18 

4460 DD CD E8 Dl E0 Dl E8 Dl E0 DD 8D 28 FD 20 FD 20 FD 20 FD 28 

4474 FD FD 20 FD 20 FD 28 FD 28 FD FD 28 FD 28 FD 28 FD 28 FD FD *, 1D58F 

4488 20 FD 20 FD 20 FD 20 FD 8D 28 20 20 31 28 32 28 33 28 34 28 

449C 28 31 20 32 28 33 28 34 28 28 31 20 32 26 33 20 34 28 20 31 ;1DE5F 

44B8 28 32 28 33 28 34 8D 28 26 28 20 28 28 20 20 20 20 45 5A 53 

44C4 8D 49 98 9D 28 5A A5 97 3A 28 20 8D 4D 92 A6 B0 20 5A A5 97 ;1E94A 

4408 3A 28 8D 46 92 B8 9C 28 A6 A4 96 28 A4 9F 98 B7 B8 28 9A 92 

44EC A4 92 96 A2 96 21 8D 47 9D Al 96 A5 BB A6 92 9D 92 2C 20 53 ;1FC3B 

4580 A6 92 28 98 Al 9A 92 88 28 97 92 A3 B7 B8 B0 92 B0 21 0D 49 

4514 9F 98 28 98 Al 9A 92 28 97 92 A3 B7 B0 B6 92 B8 2E 6D 44 Al ;21685 

4528 A4 28 A6 A4 96 26 A5 86 92 B6 96 A4 9F 98 A6 92 9C 92 B8 21 

453C 8D 4E 92 A5 92 A4 20 53 9E A6 92 B8 3F 28 6D A3 D8 A5 D8 A7 ;2254C 

4550 06 A9 D6 F3 D0 F5 D8 F7 D@ F9 D8 43 Dl 45 Dl 47 Dl 49 Dl 93 

4564 Dl 95 Dl 97 Dl 99 Dl AC DO AE D0 B8 DO B2 D6 FC D8 FE D6 86 ;2423B 

4578 Dl 82 Dl 4C Dl 4E Dl 56 Dl 52 Dl 9C Dl 9E Dl A8 Dl A2 Dl B5 

458Ü DO B7 DO E9 D8 BB DO 05 Dl 67 Dl 09 Dl OB Dl 55 Dl 57 Dl 59 ;25A4A 

45A0 Dl 5B Dl A5 Dl A7 Dl A9 Dl AB Dl BE D8 C8 DO C2 DO C4 D6 OE 

45B4 Dl 16 Dl 12 Dl 14 Dl 5E Dl 68 Dl 62 Dl 64 Dl AE Dl BO Dl B2 ;27471 


Fünf Spiele und ein Rätsel 
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45C8 Dl 64 Dl OO 10 26 36 38 46 48 40 61 16 21 39 4C 4C 4C 4C 62 
4jDC 16 i2 w'fl 4C 4C- 4C 4C 63 16 23 34 3B 44 4fi 4C 64 14 26 31 4C 

45F6 4C 4C 4C 65 14 21 46 4C 4C 4C 4C 66 14 22 44 4C 4C 4C 4C 67 

4664 14 23 35 4C 4C 4C 4C 68 18 26 32 4C 4C 4C 4C 69 18 21 44 4C 

4618 4C 4C 4C 6A 18 22 46 4C 4C 4C 4C 68 18 23 36 4C 4C 4C 4C 6C 

462C IC 26 33 3C 44 49 4C 6D IC 21 3D 4C 4C 4C 4C 6E IC 22 3E 4C 

4646 4C 4C 4C 6F IC 23 37 3F 40 4B 4C 66 11 24 41 4C 4C 4C 4C 61 

4654 11 25 30 4C 4C 4C 4C 62 11 26 34 4C 4C 4C 4C 03 11 27 45 4C 

4668 4C 4C 4C 04 15 24 38 4C 4C 4C 4C 65 15 25 31 39 41 48 4C 66 

467C 15 26 35 3A 45 4A 4C 67 15 27 3B 4C 4C 4C 4C 68 19 24 3C 4C 

4696 4C 4C 4C 09 19 25 32 3D 45 49 4C 0A 19 26 36 3E 41 4B 4C 6B 

46A4 19 27 3F 4C 4C 4C 4C 6C ID 24 45 4C 4C 4C 4C 6D ID 25 33 4C 

46B8 4C 4C 4C 0E ID 26 37 4C 4C 4C 4C 0F ID 27 41 4C 4C 4C 4C 06 

46CC 12 28 42 4C 4C 4C 4C Ol 12 29 34 4C 4C 4C 4C 62 12 2A 36 4C 

46E6 4C 4C 4C 03 12 2B 46 4C 4C 4C 4C 64 16 28 3C 4C 4C 4C 4C 05 

46F4 16 29 35 3D 42 4B 4C 06 16 2A 31 3E 46 49 4C 67 16 2B 3F 4C 

4768 4C 4C 4C 68 1A 28 38 4C 4C 4C 4C 09 1A 29 36 39 46 4A 4C 0A 

471C 1A 2A 32 3A 42 48 4C OB 1A 2B 3B 4C 4C 4C 4C 6C IE 28 46 4C 

4736 4C 4C 4C 6D IE 29 37 4C 4C 4C 4C OE IE 2A 33 4C 4C 4C 4C 0F 

4744 IE 2B 42 4C 4C 4C 4C 60 13 2C 34 3C 43 4B 4C 61 13 2D 3D 4C 

4758 4C 4C 4C 62 13 2E 3E 4C 4C 4C 4C 03 13 2F 36 3F 47 49 4C 64 

476C 17 2C 35 4C 4C 4C 4C 65 17 2D 43 4C 4C 4C 4C 66 17 2E 47 4C 

4786 4C 4C 4C 07 17 2F 31 4C 4C 4C 4C 08 1B 2C 36 4C 4C 4C 4C 69 

4794 1B 2D 47 4C 4C 4C 4C 6A 1B 2E 43 4C 4C 4C 4C OB 1B 2F 32 4C 

47A8 4C 4C 4C 6C 1F 2C 37 38 47 4A 4C OD 1F 2D 39 4C 4C 4C 4C 0E 

47BC 1F 2E 3A 4C 4C 4C 4C 6F 1F 2F 33 3B 43 48 4C 16 66 30 26 11 

47D6 61 31 21 12 62 32 22 13 63 33 23 14 64 34 24 15 65 35 25 16 

47E4 06 36 26 17 67 37 27 18 68 38 28 19 69 39 29 1A OA 3A 2A 1B 

47F8 OB 3B 2B IC 6C 3C 2C ID 6D 3D 2D IE 0E 3E 2E 1F 0F 3F 2F 61 

486C 60 63 02 11 16 13 12 21 26 23 22 31 30 33 32 65 04 07 66 15 

4826 14 17 16 25 24 27 26 35 34 37 36 69 68 6B 0A 19 18 1B 1A 29 

4834 28 2B 2A 39 38 3B 3A 6D OC 0F 6E ID IC 1F IE 2D 2C 2F 2E 3D 

4848 3C 3F 3E 64 66 OC 68 65 61 6D 69 06 62 OE dA 67 03 6F OB 14 

4S5C IO IC 18 15 11 ID 19 16 12 IE 1A 17 13 1F 1B 24 26 2C 28 25 

4876 21 2D 29 26 22 2E 2A 27 23 2F 2B 34 36 3C 38 35 31 3D 39 36 

4884 32 3E 3A 37 33 3F 3B 11 66 33 22 15 64 37 26 19 68 3B 2A ID 

4898 6C 3F 2E 12 03 36 21 16 67 34 25 1A 6ß 38 29 IE 0F 3C 2D 14 


;27DA0 
;285F5 
;28E56 
;2967B 
;29E88 
;2A6DB 
;2AF41 
;2B77B 
;2BFD7 
;2C84C 
;2D0B7 
;2D95F 
;2E180 
;2E626 
;2EAB2 
;2F016 
;2F37C 
;2FA2E 
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Fünf Spiele und ein Rätsel 


48AC 88 3C 28 15 @1 3D 29 16 02 3E 2A 
48Cö @D 31 25 1A 8E 32 26 18 0F 33 27 
48D4 20 2F 2A 35 30 3F 3A 09 0C 03 06 
4BES 3C 33 36 15 00 3F 2A 19 0C 33 26 
48FC 03 02 04 03 05 04 06 06 02 08 09 
4910 01 1B 0A 24 01 36 01 51 0C 


17 

83 

3F 

2B 

18 

0C 

30 

24 

19 

;2FF28 

•5 

88 

8F 

8A 

15 

10 

1F 

1A 

25 


19 

IC 

13 

16 

29 

2C 

23 

26 

39 

;383DA 

16 

03 

3C 

29 

1A 

0F 

38 

25 

01 


09 

87 

0C 

82 

10 

0B 

12 

02 

18 











;387F0 


24.6 Password 


Oft sollen Programme (und Daten) gegen unbefugten Zugriff geschützt 
werden. Es gibt dafür mancherlei Techniken unterschiedlicher Wirk¬ 
samkeit. Häufig wird zu Beginn nach einem Password (Schlüsselwort) 
gefragt. Gibt der Benutzer das richtige Wort ein, wird der Zugriff 
freigegeben. Anderenfalls können Programm und Daten gegen weitere 
Manipulation geschützt werden. Hierfür ein Beispiel, jedoch als Kopf- 
zerbrecher verpackt. 


F'24.6. 1 

2000 11 50 20 CD 
2O0C CD 15 OO 11 
2018 65 20 06 04 
2024 BE 27 20 17 
2030 20 11 6D 20 
203C 10 FB 76 3E 
2048 15 00 3E C7 
2054 9F A9 92 BO 
2O60 20 50 Al A4 
206C OD 49 9F 98 
2078 92 9D 92 21 
2084 98 Al 9A 96 


15 OO CD 06 00 
8A 20 CD 03 00 
DD 21 65 20 DD 
DD 23 10 F4 3E 
CD 15 00 06 18 
A3 32 65 20 11 
32 OO 20 76 16 
20 53 A6 92 20 
A4 A3 B7 9D 9C 

20 97 9D Al 96 
0D 50 92 9F 98 

21 OD OD OD OD 


11 

6A 

20 


3E 

42 

32 

; 05F0 

7E 

00 

DD 


A3 

32 

65 

; OED2 

CD 

3E 

OO 


7D 

20 

CD 

; 162F 

4B 

BO 

Al 


9C 

Al 

A4 

5 1FF9 

OD 

3F 

20 


A5 

B8 

A6 

; 2B6C 

20 

97 

92 


OD 

OD 

OD 

; 33A2 


25 

Zum Abschluß 


Sie haben nun die Grundzüge des Programmicrens in Maschinenspra¬ 
che kennengelernt. Ein weites Feld tut sich damit vor Ihnen auf. Aber 
auch für die Arbeit mit BASIC bzw. dem BASIC-Interpreter eröffnen 
sich im Umgang mit einem Clean-Computer neue Möglichkeiten. Der 
Interpreter ist ja auch ein Maschinenprogramm, und beim MZ-700 
steht es im RAM und kann daher verändert werden. In dem Büchlein 
von BBG [4] finden Sie u. a. Möglichkeiten, den LIST-Befehl abzuän¬ 
dern. Mit der in diesem Buch gewonnenen Kenntnis über die Verschlüs¬ 
selung von Texten müßte es Ihnen eigentlich möglich sein, per BASIC 
die «Error»-Meldungen in «Mist!» umzufunktionieren) zugegebener¬ 
maßen ein fragwürdiger Gag. Ernsthafter ist folgende Manipulation: 

Das vorliegende Buch wurde umständehalber mit einem schnell 
zusammengeschriebenen BASIC-Textverarbeitungsprogramm zu Pa¬ 
pier gebracht. Die Textzeilen wurden mit INPUT eingegeben. Bekannt¬ 
lich dürfen dann aber keine Kommas im Text Vorkommen, weil sonst 
das hinter ihnen Stehende ignoriert wird. Folgende Überlegung führte 
zur Abhilfe: Der BASIC-Interpreter erkennt das Komma vermutlich 
durch einen Vergleich CP 2C. Wo also folgen im BASIC-Interpreter die 
beiden Bytes FE und 2C aufeinander? Mit einem Testprogramm wurde 
dann probiert, an welcher Stelle das 2C durch den Code eines nicht 
benötigten Zeichens ersetzt werden muß, damit ein im Text stehendes 
Komma korrekt angenommen wird. Lösung: Vor dem INPUT POKE 
$2663,$BE und nach den INPUT POKE $2663,$2C. Beim benutzten D- 
BASIC ist die fragliche Adresse $28AD. 
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Zum Abschluß 


25.1 Die Ausgabe von BASIC-Zeilennummern 


.1.1 

|_IMIT*CEFF 
PRINT"AAA" 

PRINT"BBBB" 

PRINT"CCCCC" 

PRINT"DDDDDD" 

PRINT"EEEEEEE" 

DATA *D3,*E4,*3E,*16,*CD. 
DATA *6B,*FD,*6E,*O0,*FD, 
DATA *FD,$56,$03,*CD,*06. 
DATA *30,*CF,*E5,*C1,*FD 
DATA *00, *00, *A7, *ED, *42 
DATA *39,*CF,*7B,*CD,*39 
DATA *CB,*3F,*C,B,*3F,*CB 
DATA *12,*00,*F1,*CD,*DA 
FOR 1=0 TO 79 
, read A: F'QKE *CF00+I,A 
l NEXT I 
, USR(*CFO0) 

REM Für D-BASIC *6BCF -> 


*12,*0O, 
* 66 ,* 01 , 
*00,*CD, 
*09,*1B, 

, *E1,*C0, 

, *CF,*C9, 
, *3F,*CD, 
, *03,*CD, 


*8067 


*FD,*21,*CF 
*FD,*5E,*02 
*26,*CF,*CD 
*E5,*E5,*01 
*76,*7A,*CD 
*F5,*CB,*3F 
*DA,*03,*CD 
*12,*00,*C9 


Dieses Programm gibt die verwendeten Zeilennummern aus. Versu¬ 
chen Sie, die Wirkungsweise zu verstehen. Dabei wird sich Ihnen ein 
interessantes Knobelproblem auftun. Vielleicht gelingt es Ihnen, auch 
Programme zu erfassen, die bis in den Bereich oberhalb von CFFF 
hineinreichen? Die Startadresse 8067 gilt für das D-BASIC von Gischel; 
für das S-BASIC von Sharp gilt 6BCF. 

Stört es Sie, daß die Zeilennummem hexadezimal ausgegeben wer¬ 
den? Nun, das müßten Sie ja jetzt ändern können! 

Richtig interessant und nützlich wird das Programm aber erst dann, 
wenn es nur die Nummern der Zeilen ausgibt, in denen eine 
bestimmte, von Fall zu Fall frei bestimmbare Variable vorkommt. Das 
kann bei der Fehlersuche in sehr langen BASIC-Programmen recht 
nützlich sein. 



Zum Abschluß 
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25.2 Feingrafik mit BASIC 


Man kann auf dem in Kapitel 19 begangenen Weg die Auflösung des 
Bildschirms vervierfachen. Hierzu folgendes Programm: 


100 LIMIT *CEFF: 
HO DATA *D3,*E3, 
120 DATA *11,*01, 
130 DATA *C9,*F5, 
140 DATA *CB,*3C, 
150 DATA *CB,*00, 
160 DATA *16,*00, 
170 DATA *D3,*E3, 
1B0 DATA *C9 


PI“4 * ATN(l) 
*3E,*F0,*32,*00, 
*D0,*01,*E8,*03, 
*C5,*D5,*E5,*21, 
*CB,*10,*CB,*3D, 
*CB,*00,*3E,*C6, 
*5C,*26,*D0,*06, 
*CB,*C6,*D3,*E1, 


*D0,*21, 
*ED,*B0, 
* 00 ,* 00 , 
*CB,*10, 
*80,*32, 
*28,*19, 
*E1,*D1, 


*00,*D0 
*D3,*E1 
*06,*00 
*CB,*00 
*3F,*CF 
*10,*FD 
*C1,*F1 


190 FQR 1-0 TO 70: READ A: PORE *CF00+I,As NEXT I 
200 USR(*CF00) ’ 

210 A0=24: GOSUB 300 
220 A0=16: GOSUB 300 
230 A0= 8: GOSUB 300 
240 GOTO 240 
250 : 

300 FOR X=0 TO 79: Y=INT<25-A0*SIN(PI*X/24>5) 

310 F'OKE *CF1 A, X: POKE *CF1B,Y: USR(*CF15): NEXT X 
320 RETURN 


Sicherlich fallen Ihnen viele weitere Anwendungsmöglichkeiten ein! 
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Zum Abschluß 


25.3 Hinweise zu RENUMBER 

S-BASIC stellt schon den Befehl RENUM bereit. Dennoch sei die Frage 
erlaubt, wie denn so etwas wohl funktioniere. 

Das völlig sinnlose BASIC- Programm P25.3.1 ist nicht zum Ablauf 
bestimmt; an ihm soll vielmehr etwas aufgezeigt werden. 

P25.3.1 10 XF A=B TUEN 20 

s 20 S05UB 1000 

30 ON X GOTO 10, 20 
40 GOTO 20 
1000 PRINT A 
101O RETURN 

Es steht so im Speicher: 



Del 

i m 

Zei 

Nr 




6BCF 

10 

00 

0A 

00 

93 

20 

41 

6BDF 

0A 

00 

14 

00 

81 

20 

0B 

6BE9 

13 

00 

IE 

00 

9D 

20 

58 


14 

00 

00 





6BFC 

0A 

00 

28 

00 

80 

20 

0B 

6C06 

08 

00 

E8 

03 

8F 

20 

41 

6C0E 

06 

00 

F2 

03 

84 

00 


6C14 

00 

00 







F4 42 20 E2 20 0B 14 00 00 
E8 03 00 

20 80 20 0B 0A 00 2C 20 0B 

14 00 00 
00 


Die einzelnen Zeilen beginnen mit einem zwei Bytes langen Delimeter, 
der die Entfernung bis zum Beginn der nächsten Programmzeile angibt. 
Es folgen zwei Bytes mit der (natürlich ebenfalls) hexadezimal codierten 
Zeilennummer. Jede Zeile endet mit 00. Der Delimeter 0000 zeigt 
«Programmende» an. 

93 ist das «Token.. (Befehlscodierung) für "IF", E2 für "THEN", 81 für 
"GOSUB", 8F für "PRINT". 

Wie also könnte RENUMBER aufgebaut sein? 


Anhang 


A Geschwindigkeit ist keine Hexerei 

Das folgende BASIC-Programm wird ohne Erklärung der Arbeitsweise 
mitgeteilt. Tippen Sie es in Ihren Mz-700 ein: 


100 CLS: LIMIT *AFFF: REM 
110 F'RINT"Geischwi ndi qkei t 
120 FOR 1=45056 TC) 45108: 
130 PORE I,A: NEXT I 
140 PRINT"MENUE:" 


$AFFF = 45055 

ist k eine Hexerei!PRINT 

READ A 


1PRINT" 1) BASIC 10mal " 

160 PRINT" 2) MASCHINE lüOmal" 

170 CURSOR 0,6s I NF'IJT "Kennzahl: " ; K 

180 ON K GOTO 210,260 

190 PRINT"Fehl erhafte Eingabe!": END 


210 FOR I : " = 1 TO 10 

220 FOR J = 1 TO 26: POKE 54047+J,J: 
230 FOR J-l TO 26: POKE 54047+J,0: 
240 NEXT I: USR($3E): GOTO 170 
250 : 


NEXT J 
NEXT J 


260 USR($B000)s GOTO 170 
270 s 

280 DATA $F5,$C5,$D5,$E5,$06,$64,$F3,$D3,$E3,$CD 
290 DATA $1C,$B0,$CD,$28,$B0,$D3,$E1,$FB,$10,$F2 

•z-00 DATA $CD, $3E, $00, $E1 , $D1, $C1, $F 1, $C9, $C5, $21 
310 DATA $39, $D3, $06, $1A, *70, $2B, $10, $FC, $C1, $C9 
-••^.0 DATA $C5, $21 , $39, $D3, $06, $ 1A, $36, $00, $2B- $ 10 
330 DATA $FB,$C1,$C9 


Nach dem Programmstart mit RUN können Sie mit 1 oder 2 wählen, ob 
Sie das Alphabet von BASIC lOmal oder vom eingebundenen Maschi¬ 
nenprogramm lOOmal dargeboten bekommen wollen. Urteilen Sie 
selbst! 
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Anhang 


Vielleicht möchten Sie, wenn Sie das Buch durchgearbeitet haben, 
auch dieses Maschinenprogramm verstehen.. Dazu das folgende Li- 
sting: 


B00O 

F5 

GkHex: 

PUSH 

AF 


B001 

C5 


PUSH 

BC 


B002 

D5 


PUSH 

DE 


B003 

E5 


PUSH 

HL 


B004 

0664 


LD 

B,64H 

;100mal 

B006 

F3 

LÜOP0S 

DI 


;Interrupt gesp. 

B007 

D3E3 


□UT 

(E3H), A 

;VideoRAM ein 

B009 

CD1CB0 


CALL 

INSCRN 


B00C 

CD28B0 


CALL 

CLSCRN 


B00F 

D3E1 


GUT 

(E1H),A 

;Hauptspeicher 

B011 

FB 


EI 


; Interrupt frei 

B012 

10F2 


DJNZ 

LOGF’0 


B014 

CD3E00 


CALL 

BELL 


B017 

El 


POP 

HL. 


B018 

Dl 


POP 

DE 


B019 

CI 


POP 

BC 


B01A 

Fl 


POP 

AF 


B01B 

C9 


RET 


;Ende Hauptprog 

B01C 

C5 

INSCRNs 

PUSH 

BC 


B01D 

2139D3 


LD 

HL,ZEILE 


B020 

061A 


L.D 

B, IAH 

;26 Buchstaben 

B022 

70 

LOOPls 

LD 

(HL),B 


B023 

2B 


DEC 

HL. 


B024 

10FC 


DJNZ 

LOOP 1 


B026 

CI 


POP : 

BC 


B027 

C 9 


RET 



B028 

C5 

CLSCRN: 

PUSH 

BC 


B029 

2139D3 


LD 

HL,ZEILE 


B02C 

061A 


LD 

B, IAH 

;26 Blanks 

B02E 

3600 

L.Ü0P2: 

LD 

(HL),00 


B030 

2B 


DEC 

HL 


B031 

10FB 


DJNZ 

L00P2 


B033 

CI 


POP 

BC 


B034 

C9 


RET 




Zu den beiden OUT-Befehlen können Sie auf den Seiten 94 und 127 des 
Sharp-Handbuchs nachlesen. DI und EI (disable bzw. enable Interrupt) 
sperren alle .«maskierbaren- Interrupts bzw. geben sie wieder frei. 
Interrupts sind im wesentlichen Steuersignale von peripheren Geräten, 
z. B. Drucker, Floppy, Bandlaufwerk. 

Sehen Sie das Programm auch kritisch durch! Welches (andere) 
Befehlspaar ist mit Sicherheit überflüssig? 
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B Literaturverzeichnis 

1. Nn: Z80-Assembler-Handbuch. 1 . Auflage. München: Ing. W. 
Hofacker GmbH, 1980. 

2. Zaks, R.: Programmierung des Z80. 4. Auflage. Düsseldorf: Sybex- 
Verlag, 1983. 

3. Nn: MZ-700-Bedienerhandbuch. Hamburg/Osaka: Sharp Corpora¬ 
tion, 1983. 

4. Bialke, Berendsen, Gliszczynski: Alles über den MZ-700. 1. Auf¬ 
lage. Ahrensburg: BBG Software, 1983. 

5. Baumann, R.: Programmieren mit Pascal. 1. Auflage. Würzburg: 
Vogel-Buchverlag, 1980. 

Zu 1: Ein übersichtliches Handbuch. Der Leser sollte es (oder aber Nr. 
2) anschaffen. Neun wesentliche Druckfehler: S. 129 lies 10001.r. statt 
10000.r.; S. 233 lies OOsslOOl statt OlsslOlO. Zu Seiten 169 bis 177: Bei 
allen ORs wird C-Flag gelöscht! S. 366: Vertausche «gerade» und 
«ungerade»; «M» bedeutet «Vorzeichen minus». 

Zu 2: Viel systematische Information über die Programmierung des 
Z80. Auch Tabellen ähnlich 1. 

Zu 3: Wer einen MZ-700 hat, besitzt auch dieses Handbuch. Wer mit 
einem anderen Z80-Computer arbeitet, täte gut daran, es sich zu 
beschaffen. 

Zu 4: Zahlreiche nützliche Speicheradressen. Manipulation des BASIC- 
Interpreters. Auch Hinweise auf Maschinensprache mit Tabelle Mne- 
monics/Opcodes. 

Zu 5: Hier lediglich Hinweis auf Erzeugung von Permutationen durch 
Rekursion. 
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C Die Lösungen der Aufgaben, Lösungsvorschläge 

Die Lösungen der Auifg^ben* Lösungsvorschläge 


L3. 1. 1 

a) 57 

b) 

41 c) 48 

d) 65 

e) 

6C 




I T 1 O 







A 

H 

L 

L. m J. m 


An genommen er Arvfangsz 

USt 

. : 

12 

34 

56 



LD 

A, H 

7C 



34 

34 

56 



LD 

H, L 

65 



34 

56 

56 



LD 

L, A 

6F 



34 

56 

34 

L3.2.1 

a) 637 

b > 

80 c) 81 

d) 82 






L3.2.2 

2000 

LD 

A„(1200) 

3A 

00 

12 





2003 

LD 

D, A 

57 







2004 

LD 

A,(1201) 

3A 

01 

12 





2007 

ADD 

A, D 

82 







2008 

LD 

(1202),A 

32 

02 

12 





200B 

JP 

0000 

C3 

00 

00 




L3.2.3 

2000 

3A 00 12 6F 3A 

01 12 

37 






2008 

OO 8D 32 02 12 

C3 00 

00 





L3-3.1 

2000 

LD 

A,(1202) 

3A 

02 

12 





2003 

LD 

L, A 

6F 







2004 

LD 

A,(120A) 

3A 

0A 

12 





2007 

ADD 

A, L 

85 







2008 

LD 

(1212), A 

32 

12 

12 





2O0B 

LD 

A,(1201) 

3A 

01 

12 





200E 

LD 

L, A 

6F 







2O0F 

LD 

A, (1209) 

3A 

09 

12 





2012 

ADC 

A, L 

8D 







2013 

LD 

(1211),A 

32 

11 

12 





2016 

LD 

A,(1200) 

3A 

00 

12 





2019 

LD 

L, A 

6F 







201A 

LD 

A, (1208) 

3A 

08 

12 





20 ID 

ADC 

A, L 

8D 







20 IE 

LD 

(1210), A 

32 

10 

12 





2021 

JP 

0000 

C3 

00 

00 





L3.3.3 Die Zahl, von der subtrahiert wird, sollte 
oben stehen, der Subtrahend darunter. Wir müssen 
also zuerst den in der mittleren Zeile stehenden 
Subtrahenden ins H-Register laden und dann erst 
den in der oberen Zeile stehenden Minuenden in den 


Akkumulators 
2000 

LD 

A,(120A) 

3A 

0A 12 

2003 

L.D 

H„ A 

67 


2004 

LD 

A,(1202) 

3A 

02 12 

2007 

SUB 

A, H 

94 


2008 

DAA 


27 



L4. 1. 


b 


c 

L4.2. 

(31 


b 


L.4.3. 


Anhang 


1 

) 


> 


) 

2 

) 


2009 

LD 

(1212), A 

•i ro 

X.. 

12 

12 

200C 

LD 

A,(1209) 

3A 

09 

12 

20OF 

LD 

H, A 

67 



20 1 0 

LD 

A,(1201) 

3A 

01 

12 

2013 

SBC 

A, H 

9C 



2014 

DAA 


27 



2015 

LD 

(1211),A 

TH 

x.. 

11 

12 

2018 

LD 

A,(1208) 

3A 

08 

12 

201B 

LD 

H, A 

67 



201C 

L.D 

A,(1200) 

3A 

00 

12 

201F 

SBC 

A, H 

9C 



2020 

DAA 


27 



2021 

LD 

(1210), A 


10 

12 

2024 

J P 

0000 

C3 

00 

00 

2000 

LD 

HL,ABCD 

21 

CD 

AB 

2003 

LD 

A, H 

7C 



2004 

L.D 

(1200),A 

32 

00 

12 

2007 

LD 

A,L 

7D 



2008 

L.D 

(1201),A 

32 

01 

12 

200B 

JP 

0000 

C3 

00 

00 

200E 

LD 

HL,6789 

21 

89 

67 

201 1 

LD 

A, H 

7C 



2012 

LD 

(1200),A 

32 

00 

12 

2015 

LD 

A, L 

7D 



2016 

LD 

<1201 ) ,A 

32 

01 

12 

2019 

JP 

0000 

C3 

00 

00 

201 1 

JP 

2003 

C3 

03 

20 

2100 

L_D 

DE,2301 

11 

01 

OT 

2103 

LD 

(1200),DE 

ED 

53 

00 

2107 

LD 

DE,6745 

11 

45 

67 

210A 

L.D 

(1202),DE 

ED 

53 

02 

210E 

JP 

0000 

C3 

00 

00 

2200 

LD 

HL „ 2301 

21 

01 

OT 

2203 

LD 

(1200),HL 

22 

00 

12 

2206 

LD 

HL,6745 

21 

45 

67 

2209 

LD 

(1202) ,HL. 

no 

02 

12 

220C 

JP 

0000 

C3 

00 

00 

2300 

L.D 

HL,(1200) 

2A 

00 

12 

2303 

LD 

(1202),HL 

oo 

.•U. Xm 

02 

12 

2306 

L.D 

HL,(1208) 

2A 

08 

12 

2309 

LD 

(120A),HL 

OT 

0A 

12 

230C 

LD 

HL,(1201) 

2A 

01 

12 

230F 

LD 

DE,(1209) 

ED 

5B 

09 

2313 

ADD 

HL, DE 

19 



2314 

L.D 

(120F),HL 

nn 

OF 

12 

2317 

LD 

(1211) ,, HL. 

2° 

1 1 

12 

231A 

JP 

0000 

C3 

00 

00 
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L4.3.3 


Beurte 
unschc 
or z us 
ösunt 


2007 

SCF 


37 


2008 

CCF 


3F 


2009 

SBC 

HL, DE 

ED 52 


Einen 

Befehl SUB HL, DE 

gibt es 

n i c: h 

2400 

LD 

HL,(120O) 

2A 00 

12 

2403 

ADD 

HL , HL 

29 


2404 

ADD 

HL, HL 

29 


2405 

ADD 

HL, HL 

29 


2406 

LD 

(1208),HL 

22 08 

12 

2409 

JP 

0000 

C3 00 

00 

2000 

LD 

A, 00 

3E 00 


2002 

LD 

HL,1200 

21 00 

12 

2005 

LD 

(HL),A 

77 


2006 

INC 

HL 

n-y 


2007 

LD 

(HL),A 

77 


2008 

INC 

HL 

n? 


2012 

INC 

HL 

23 


2013 

LD 

(HL),A 

77 


2014 

JP 

0000 

C3 00 

00 

Len Sie., ob 

bei diesem 

- zugegebener 

än — Programmaufbau der 

Befehl 

LD ( 

shen gewesen wäre- 



8 * 2 

>8*1+2 



a> 7F 

(größter Vorwärtssprung) 

b) 

c) 67 

d) EE e) Al f) zu weit 

g) vi 

e 1 z u 

weit; Rückwärtssprung! 

a) 200A b) 200D c) 2 

10A ~ 200D = 

ci) 200B DJNZ 20OA 

10 FD 


2000 

LD 

A,(1200) 

3A 00 

12 

2003 

CP 

00 

FE 00 


2005 

JR 

2,2011 

28 OA 


2007 

L.D 

B, A 

47 


2008 

LD 

A,(1201) 

3A 01 

12 

200B 

L.D 

C, A 

4F 


200C 

LD 

A, 00 

3E 00 


20 OE 

ADD 

A,C 

81 


200F 

DJNZ 

20 OE 

10 FD 


201 1 

L.D 

(1202),A 

32 02 

12 

2014 

JP 

0000 

C3 00 

00 

2100 

L.D 

B, 40 

06 40 


2102 

LD 

A, FF 

3E FF 


2104 

LD 

HL,1230 

21 30 

12 

2107 

CALL 

AFFB 

CD FD 

AF 

210A 

JP 

0000 

C3 00 

00 
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L7. 1. 


L7.2.1 


L7.: 


L7-: 


L10. 


l. 1o.: 


3100 

LD 

HL,1200 

21 

00 

12 


3103 

LD 

B, (HL) 

46 




3104 

INC 

HL. 

0» 




3105 

LD 

A, (HL) 

7E 




3106 

CALL 

0012 

CD 

12 

00 


3109 

DJNZ 

3104 

10 

F9 



31 OB 

HALT 


76 




3200 

LD 

HL,1200 

21 

00 

12 


3203 

LD 

A, (HL.) 

7E 




3204 

CP 

2A 

FE 

2A 



3206 

JR 

Z, 32OE 

28 

06 



3208 

CALL 

0012 

CD 

12 

00 


320B 

INC 

HL 

07 

•.> 




320C 

JR 

3 2p 3 

18 

F5 

T 

1 

320E 

HALT 


76 



3000 

LD 

A, (DE) 

1A 




3001 

CP 

OD 

FE 

OD 



3003 

JR 

Z,30OB 

28 

06 



3005 

CALL 

0012 

CD 

12 

00 


3008 

INC 

DE 

13 




3009 

JR 

3000 

18 

.F5 



300B 

RET 


C9 




1200 



56 

4F 

47 

45 

1206 



42 

55 

43 

48 

120C 



52 

4C 

41 

47 

4000 

L.D 

DE,1200 

1 1 

00 

12 


4003 

LD 

B, 16 

06 

16 



4005 

CALL 

0015 

CD 

15 

00 


4008 

CALL 

0006 

CD 

06 

00 


400B 

DJNZ 

4005 

10 

F8 



400D 

HALT 


76 




1200 



12 

34 



2000 

LD 

DE,(1200) 

ED 

5B 

00 

12 

2004 

PUSH 

DE 

D5 




2005 

POP 

BC 

CI 




2006 

LD 

(1202),BC 

ED 

43 

02 

12 

200A 

JP 

DUMP12 

C3 

DF 

AF 


1200 



12 

34 

56 

78 

5000 

LD 

BC,(1200) 

ED 

4B 

00 

12 

5004 

PUSH 

BC 

C5 




5005 

LD 

BC,(1202) 

ED 

4B 

02 

12 

5009 

L.D 

(1200),BC 

ED 

43 

00 

12 

50 OD 

POP 

BC 

CI 




50 OE 

LD 

(1202),BC 

ED 

43 

02 

12 

5012 

JP 

DUMP12 

C3 

DF 

AF 



$ß»f -MV £ 2 0- 3L 
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L1 0 . 3 . 
wurde 
nach 2 
mentie 
bo dar 


4 Der Computer hängt. Beim CALL in Zeile 2028 
über dem Rüc:ksprung nach 201E ei n Ruc kspr ung 
!0 2 B v o r g emer k t , un d der wird 
■ren c*usge f ühr t • Schemat i sc I* 


nach dem De kr er¬ 
stellt sich das 


202B CALL MSQNL 


202B 


DEC SP 
DEC SP 


202D RET 


202B DEC SP 


Stapel 
(unvolIst-) 


SP -- > 202B 
20 IE 


SP 


SP 


202B 
20 IE 

???? 
202B 
20 IE 


L10.3.5 5100 

PUSH 

HL 

ES 





5101 

PUSH 

HL 

E5 





5102 

INC 

SP 

3 c* 





5103 

PGP 

HL 

El 





5104 

INC 

SP 

33 





L10-3.7 2000 

CALL 

2025 

CD 

25 

20 


? 0. E” 

2003 

CALL 

200F 

CD 

0F 

20 


> 1. E. 

2006 

CALL 

2025 

CD 

25 

20 


" 0. E •" 

2009 

CALL 

PAUSKY 

CD 

D9 

AF 



200C 

JP 

MONI TR 

C3 

00 

00 



l.Es 200F 

CALL 

2020 

CD 

20 

20 


? l.E’ 

2012 

CALL 

2019 

CD 

19 

20 


> 2.E. 

2015 

CALL 

2020 

CD 

20 

20 


? l.E’ 

2018 

RET 


C9 





2.Es 2019 

LD 

DE,1210 

1 1 

10 

12 

ji 

? 2 . E ? 

20 IC 

CALL 

MSGNL 

CD 

ED 

AF 



201F 

RET 


C9 





2020 

LD 

DE,1208 

1 1 

08 

12 



2023 

JR 

20 ic 

18 

F7 




2025 

LD 

DE,1200 

1 1 

00 

12 



2028 

JR 

20 ic 

18 

F2 




So wurden 2 Bytes eingespart. 

Gibt 

es 

wirksamere 

V e r k ü r z u n g e n ? 








L10- 4- 2 2000 

LD 

SP,2000 

31 

00 

20 



2003 

LD 

HL,1234 

21 

34 

12 



2006 

LD 

B , 00 

06 

00 




2008 

PUSH 

HL 

E5 





2009 

INC 

HL 

23 





200A 

DJNZ 

2008 

10 

FC 




200C 

JP 

DUMP12 

C3 

DF 

AF 
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L10. 


(A) 20 30 

40 50 

60 70 80 90 A0 B0 C0 D0 E0 FO 

sec .2 .5 

"7 “775 

2 3 4 5 

7 10 13 16 20 25 

L10.6.2 Ändern Sie 

(2001) zu 27 

r und (2011) zu 3 

üb er sc h r e i b en un d 

ergänzen Sie 

dann das Proqrami 

so: 201F 

L.D 

B, 27 

06 27 

2021 

LD 

A,(IX+00) 

DD 7E 00 

2024 

LD 

(IY+00),A 

FD 77 00 

2027 

LD 

A, 40 

3E 40 

2029 

CALL 

WARTEN 

CD B8 AF 

202C 

LD 

(IY+00),00 

FD 36 00 00 ;sp< 

2030 

DEC 

1‘X 

DD 2B 

2032 

DEC 

IY 

FD 2B 

2034 

DJNZ 

2021 

10 EB 

2036 

JR 

2000 

18 C8 

vielleicht überlegen Sie noch. 

ob man die drei f 

sten Zeilen 

(2000 

. .. 2009) und 

den Rücksprung 

zwar nicht bytemäß 

ig, aber doch 

gedanklich noch 

ein wenig stra-f-fen 

könnte. 


LU. 2. 2 Die Bi närdar stel 1 ung macht es deutlich: 

0001 0010 

001 1 

0100 0101 

0110 0111 1000 

0010 0100 

0110 

1000 1010 

1100 1111 0000 

LI 1-2.3 2020 

LD 

HL,1200 

21 00 12 

2023 

SRL 

(HL) 

CB 3E 

2025 

INC 

HL 

23 

2026 

RR 

(HL) 

CB IE 

2028 

INC 

HL 

OT 

2029 

RR 

(HL) 

CB IE 

202B 

INC 

HL 

23 

202C 

RR 

(HL) 

CB IE 

202E 

JP 

DUMP12 

C3 DF AF 

LI 1.3.2 2120 

PUSH 

HL 

E5 

2121 

PUSH 

BC 

C5 

2122 

LD 

HL,1200 

21 00 12 

2125 

LD 

B, 08 

06 08 

2127 

SCF 


37 

2128 

CCF 


3F 

2129 

RR 

(HL) 

CB IE 

212B 

INC 

HL 

OT 

212C 

DJNZ 

2129 

10 FB 

212E 

POP 

BC 

CI 

212F 

POP 

HL 

El 

2130 

RET 


C9 


LI 1-4.4 Folgende PUSHs und POPs sind unnötig: 
21O0, 210F, 2120, 212F, 2140, 2155. 
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L. 12 - 1.2 

Maskieren Sie zu a) mit 

01, z u b 

07, 0F, 

1F, 3F 

■, 7F 

und zu c.) mit 

80- 

L12.2. 1 

2000 

LD 

A,(1200) 

3A 00 12 


2003 

AND 

F0 

E6 F0 


2005 

LD 

(1201), A 

32 01 12 


2008 

LD 

A,(1200) 

3A 00 12 


200B 

AND 

0F 

E6 0F 


200D 

LD 

(1202),A 

32 02 12 


2010 

JP 

DUMP12 

C3 DF AF 

L12.2.2 

2000 

L.D 

A,(1200) 

3A 00 12 


2003 

SRL 

A 

CB 3F 


2005 

SRL. 

A 

CB 3F 


2007 

SRL 

A 

CB 3F 


2009 

SRL 

A 

CB 3F 


200B 

CALL 

AUSGEB 

CD 18 20 


200E 

LD 

A,(1200) 

3A 00 12 


2011 

CALL 

AlJSGEB 

CD 18 20 


2014 

CALL 

PAUSWK 

CD D4 AF 


2017 

RST 

00 

C7 

AUSGEB 

2018 

AND 

0F 

E6 0F 


201A 

GR 

30 

F6 30 


20 IC 

CALL 

PRNT 

CD 12 00 


201F 

RET 


C9 

L12.2.3 

Nur AUSGEB 

ist zu änderna 

AUSHEX 

2018 

AND 

0F 

E6 0F 


201A 

GR 

30 

F6 30 


20 IC 

CP 

3A 

FE 3A 


20 IE 

JR 

C, 2022 

38 02 


2020 

ADD 

A, 07 

C6 07 


2022 

CALL 

PRNT 

CD 12 00 


2025 

RET 


C9 

L13. 1- 1 

2700 

LD 

A, (1201) 

3A 01 12 


2703 

LD 

(1209), A 

32 09 12 


2706 

LD 

A,(1200) 

3A 00 12 


2709 

LD 

HL,1209 

21 09 12 


270C 

RL.D 


ED 6F 


270E 

LD 

(1208),A 

32 08 12 


2711 

JP 

DUMP 12 

C3 DF AF 

L13.1.2 

2100 

PUSH 

BC 

C5 


2101 

LD 

HL,122F 

21 2F 12 


2104 

XGR 

A 

AF 


2105 

LD 

B, 08 

06 08 


2107 

RLD 


ED 6F 


2109 

DEC 

HL 

2B 


210A 

DJN7. 

2107 

10 FB 


210C 

POP 

BC 

CI 


210D 

RET 


C9 
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Was bewirkt der Befehl XOR A ? - Lesen Sie unter 
12.2 nach und berechnen Sie n XOR n. Beispiel: 
Akkuinha.lt als 1. Operand: 01101101 
Akkuinhalt als 2. Operand: 01101101 


LI3.1.3 2120 

PUSH BC 

C5 




2121 

LD HL., 1220 

21 

20 

12 


2124 

XOR A 

AF 




2125 

LD B,08 

06 

08 



2127 

RRD 

ED 

67 



2129 

INC HL 

O "T 




212A 

DJNZ 2127 

10 

FB 



212C 

POP BC 

C1 




212D 

RET 

C9 



L14.2.3 

3030 

CALL NULL. 12 

CD 

F4 

AF 


3033 

LD HL., 1200 

21 

00 

12 


3036 

LD B,08 

06 

08 



3038 

CALL ??KEY 

CD 

B3 

09 


303B 

CALL 7DACN 

CD 

CE 

OB 


303E 

LD (HL).A 

77 




30 3 F 

CALL PRNT 

CD 

12 

00 


3042 

INC HL 

r t ? ’T 




3043 

DJNZ 3038 

10 

F3 



3045 

JP DUMP12 

C3 

DF 

AF 

L14«5 „1 






IN6HEX: 

AF47 

CALL INBYTE 

CD 

57 

AF 


AF4A 

LD (HL),A 

77 




AF4B 

DEC HL 

2B 



IW4HEXs 

AF4C 

CALL INBYTE 

CD 

57 

AF 


AF4F 

L.D (HL) , A 

j-/ 




AF50 

DEC HL 

2B 



IN2HEX g 

AF51 

CALL INBYTE 

CD 

57 

AF 


AF54 

LD (HL)„A 

77 




AFS 5 

DEC HL 

2B 




AFS 6 

RET 

C9 



L14.6. .1 






DU TB VT 

AF - %!>0 

PUSH AF 

F5 




AF31 

SRL A 

CB 

3F 



AF33 

SRL A 

CB 

3F 



AF35 

SRL A 

CB 

3F 



AF37 

SRL A 

CB 

3F 



AF39 

CALL ASC 

CD 

DA 

03 


AF3C 

CALL PRNT 

CD 

12 

00 


AF3F 

POP AF 

Fl 




AF'40 

CALL ASC 

CD 

DA 

03 


AF43 

CALL PRNT 

CD 

12 

00 


AF46 

RET 

C9 
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L14.6.2 2O00 

LD 

HL,1200 

21 00 12 


20O3 

LD 

B, 08 

06 08 


2005 

LD 

A,(HL) 

7E 


2006 

CALL 

OUTBYT 

CD 30 AF 


2009 

INC 

HL 

23 


200A 

DJNZ 

2005 

10 F9 


200C 

CALL 

PAUSWK 

CD D4 AF 


200F 

RST 

00 

C7 


L14.7* 1 





0UT6HX: AF20 

LD 

A, (HL) 

7E 


AF21 

CALL 

OUTBYT 

CD 30 AF 


AF24 

DEC 

HL 

2B 


ÜUT4HX: AF25 

L.D 

A,(HL) 

7E 


AF26 

CALL 

OUTBYT 

CD 30 AF 


AF29 

DEC 

HL 

2B 


□UT2HX: AF2A 

LD 

A,(HL) 

7E 


AF2B 

CALL 

OUTBYT 

CD 30 AF 


AF2E 

DEC 

HL 

2B 


AF2F 

RET 


C9 


L14-7-2 2900 

LD 

HL,130F 

21 0F 13 


2903 

LD 

B, 05 

06 05 


2905 

CALL 

PRINTS 

CD 0C 00 


2900 

CALL 

IN6HEX 

CD 47 AF 


290B 

DJNZ 

2905 

10 F8 


290D 

CALL 

LETNL 

CD 06 00 


2910 

LD 

HL,130F 

21 0F 13 


2913 

LD 

B , 05 

06 05 


2915 

CALL 

PRINTS 

CD 0C 00 


2918 

CALL 

01JT6HX 

CD 20 AF 


291 B 

DJNZ 

2915 

10 F8 


29 ID 

CALL 

LETNL 

CD 06 00 


2920 

JR 

2900 

18 DE 


L14-8-2 a) Bit7 aus A wird 

über Carry zu 

Bit0 in B 

b) Bit0 von B 

wird 

zu Bit3 

von B. c: > Das 

ehemalige 

Bit6 aus A wird ins Carry 

übertragen- d) 

Der Carry 

Inhalt wird z 

u Bit0 von B 

und Bit3 von B 

wird zu 

Bit4 von B. e) Die 

Ausgabe 

erfolgt aus dem Akku- 

L. 14-0-4 a) 

301B 

b) 301B + E5 - 100 » 

3000 

L14.0-5 





OUTBINs AEF8 

PUSH 

BC 

C5 


AEF9 

LD 

C, A 

4F 


AEFA 

CALI- 

BITBIT 

CD 0B AF 


AEFD 

CALL 

BITBIT 

CD 0B AF 


AF00 

CALL 

PRINTS 

CD 0C 00 


AF 03 

CALL 

BITBIT 

CD 0B AF 


AF06 

CALL 

BITBIT 

CD 0B AF 


AF09 

POP 

BC 

CI 


AF0A 

RET 


C9 



Anhang 


BI TBl Ts 


1 - 14 , 8.6 


L15.1, 


Die anc 
ändern: 
HEXDEZ 
SHILKS 

ZFDOPC 

SUBRUT 


AFOB 
AF0D 
AF0F 
AF1 1 
AF 1 3 
AF1 '5 
AF1 7 
AF 19 
AF1B 
AF“ 1C 
AF 1F 

2O0O 
2003 
2006 
2007 
200A 
200B 
200E 

7000 

7003 

7006 

7009 

700C 

700F 

7012 

7015 


200D 
2100 
2105 
2140 
2151 


L.D 

SLA 

RL 

SLA 

SLA 

SLA 

SLA 

RL. 


B, 00 

C 

B 

B 

B 

B 

C 

B 


06 00 
CB 21 
CB 10 
CB 20 
CB 20 
CB 20 
CB 21 


CD A, B 

78 



CALL QUTBYT 

CD 

30 

AF 

RET 

C9 



CALL LETNL 

CD 

06 

00 

CALL INBYTE 

CD 

57 

AF 

PUSH AF 

F5 



CALL. PRINTS 

CD 

0C 

00 

POP AF 

Fl 



CALL OUTBIN 

CD 

F8 

AE 

JR 2000 

18 

F0 


CALL LETNL 

CD 

06 

00 

CD HL,1201 

21 

01 

12 

CALL IN4HEX 

CD 

4C 

AF 

CALL PRINTS 

CD 

0C 

00 

CALL HEXDEZ 

CD 

00 

20 

CD HL,1204 

21 

04 

12 

CALL 0UT6HX 

CD 

20 

AF 

JR 7000 

18 

E9 



?n Progr ammz eilen 

si nd 

RET 


C9 

L.D 

HL,1200 

21 < 

INC 

HL 


L.D 

HL,1202 

21 < 

INC 

HL 

23 


sind wie -folgt zu 


00 . 1 : 


i: 


bi s' Es Sül 1 en 1edi 9 11 ch Zahlen 

1 -fuT i'nn* “ FFFFh “"gewandelt werden. 

pal fünfstellige Dezimal zahl (3 Bytes 

i 12t» 7 ; Vierstellige Hexadezimalzahl 

Stellenwerte: l0000d = 2710h, 1000d 3F8h 100H 

= 64h, lfcid = Ah, ld = lh ’ 1 --’ d 

1> Ergebnisfeld und 1Y auf 


EFNULL 


LAB1 


3100 

3101 
3103 

3106 

3107 

3108 
310A 
310E 


XOR 

LD 

L.D 

LD 

INC 

DJNZ 

LD 

RET 


A 

B, ID 
HL,1203 
(HL),A 
HL 

LAB 1 
IY,0000 


Nul 1 


sei 

AF 

06 

21 

77 

10 

FD 

C9 


:en : 


ID 

03 


FC 

21 


12 


00 00 


229 
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2) Halbbytes“ 
DZSWAP 3120 
3121 
3124 

3126 

3127 
3129 
312A 
312C 
312D 

der Ai 


3) Var 
VORANZ 


3140 

3142 

3143 

3144 

3147 

3148 
31 4 B 

4; Ha j bhvtes 


-Swap der Dezimalzah1s 


XOR 

A 

Ah 


LD 

HL,1202 

21 

02 

RLD 


ED 

6F 

DEC 

HE¬ 

28 


RLD 


ED 

6F 

DEC 

HL 

28 


RLD 


ED 

6F 

LD 

8, A 

47 


RET 


C9 


■ \ ze:i qe 

muß das Re 

S LI .1 t. d L 1 1 

PUSH 

IY 

FD 

ES 

POP 

DE 

Dl 



12 


den Speicher 


/DE 


LADTVD 


5) Zum 
DEZHEX 


31 60 

3163 

3164 

3165 
3167 
3169 

Sch 1uß 


L.D A s D 
LD (1206),A 
L_D A,E 
LD (1207),A 
RET 

: >wap und Addition I 
f'ALL DZ SWAP 
AND A 
RET Z 
ADD IY,DE 
DJNZ LADIYD 
RET 


7A 

32 

78 


06 i: 


32 07 12 

C9 


Y « 
CD 
A7 

ca 

FD 

10 

C9 


s IY + DE 
20 31 


19 

FC 


00 31 
20 31 
IO 27 
60 31 
E8 03 
60 31 
64 00 
60 31 
OA 0O 
60 31 
01 0O 
60 31 
40 31 
DF AF 


L 15 . 5.2 a) "Hexadezimal"? der Assembler verarbei 
tet auch Dezi mal zahlen. b> CtOöAd = 0Ö0&h usw. 
c) DEFB d > DEFM (de-fine message) 

LI6.1.5 a) (0000) = C3 b> (0000.. 

(0000 ... 0101) = 649C C) (0101) = 

d> (0000 ... 0000) “ 0328D0, (0800 

0"’63C4, (0000 ... 0FFF) = 068C74 

e) 0328D0 + 03&3C4 = 068C94, 068C94 


3000 

CALL EFNüLl 

CD 

3003 

CALL DZSWAP 

CD 

3006 

LD DE,2710 

11 

3009 

CALL ADIYDE 

CD 

30 OC 

LD DE.03E8 

11 

300F 

CALL ADIYDE 

CD 

3012 

LD DEm 0064 

11 

3015 

CALL ADIYDE 

CD 

3018 

LD DE.000A 

11 

3018 

CALL ADIYDE 

CD 

301F 

LD DE,0001 

11 

3021 

CALL ADIYDE 

CD 

3024 

CALL VORAN 1 

CD 

302? 

JP DUMP12 

C3 


0100) * 63AC 
649C—63AC = FO 
.. OFFF) » 


068C74 


!0 
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231 


f) Vor dorn Relokat 
gerweise eine tabe 
liehen Adressen: 
2000..„202E 2100. 

ADB0.„.ADDE ADDF. 


iereri macht man sich zweckmäßi- 
11 arische Übersicht der maßgeb- 


ADFD 12 
AEOS 86 


: 1 00 


' j 1 

5 

2140.. „ 

«2157 2800 „„ 

- 281 6 

iDDF 


AE. 04 

AE0! 

5* , 

-AEIC AE 

ID. . 

- AE:33 

9F 

AF 

1 1 

ID 

AE 

CD 

ED 

AF CD 

DF 


2A 

00 

12 

CD 

05 

AE 

23 

3A 03 

12 

09E7 

38 

08 

20 

F4 

3A 

02 

12 

BD 30 

EE 


ID 

AE 

CD 

15 

00 

21 

06 

12 CD 

20 

1 104 

18 

DA 

CD 

06 

00 

1 .1 

29 

AE CD 

15 


21 

01 

.12 

CD 

4C 

AF 

1 1 

2E AE 

CD 

18F8 

00 

21 

03 

12 

CD 

4C 

AF 

AF 32 

04 


32 

05 

12 

32 

06 

12 

C9 

3A 04 

12 

1DAE 

32 

04 

12 

3A 

05 

12 

CE 

00 32 

05 


3A 

06 

12 

CE 

00 

352 

06 

12 C9 

20 

2237 

9D 

AD 

AA 

A4 

A5 

83 

B3 

92 20 

0D 


B7 

BO 

20 

0D 

20 

9A 

A6 

A4 20 

0D 

2C59 


Prüfsumme über bisheriges EBS 

^EC 2 - 1 AFDF n - a n 9S ^ reSSe! J AFDF ’ Endadresse: ADEC. 
A EC AI DF- - D. Es sind also 14 Bytes (') zu 
transferieren, 

RELPRU 4800 LD IX,AFDF DD 21 DF AF 

4804 LD IV„1200 FD 21 00 p 

4808 LD B 9 OE 06 0E 

480A LD A, (IX + 00) DD 7E 00 

480D LD (IY+00)„A FD 77 00 

4810 INC IX DD 27 

4812 INC IY FD 23 

4814 DJNZ 480A t0 F4 

4816 JP 1200 C3 00 12 

Drei Fragens 

1 i ch e ni^hr ? Ürft f J da f relokatierte Programm eigent 

Jas dCch- ^ r u ekt , abla ! Jfen? b) Weshalb tut es 
, ? ^ C> Wa ® bewirkt der Sprung in 4816'? 

ni‘ht f r le ^resse des Textanfanqs (AFE5) wurde 
nicht in 1206 geändert. Zu b) Das verschobene 
Programm arbeitet noch mit dem alten String. 

1 c) Das verschobene Programm wird aufgerufen. 

LI6. 2.lb) Es soll vorwärts (in Richtung des F'ro- 
grammablau+s) verschoben werden. Dazu müssen wir 


(ADB0. 


. AFFF): 


FD 21 00 
06 0E 
DD 7E 00 


DF AF 
00 12 


FD 77 
DD 23 
FD 23 
10 F4 


77 00 


’ - -rwa. .1 vur Wttr t. 5» uri r 

grammablaufs) verschoben werden. 


4900 

LD 

IX,1264 

4904 

LD 

B, 05 

4906 

LD 

A, (IX+00) 

4909 

L.D 

(IX+03),A 

490C 

DEC 

IX 

490E 

DJNZ 

4906 

4910 

JP 

DUMP12 


06 05 
DD 7E 
DD 77 


7E 00 
77 03 


10 F6 
C3 DF AF 
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L16.2.1c) Beim Rückwärtsverschieben muß man 


vorn 


4A00 

LD 

IY,1203 

4A04 

LD 

B, 05 

4A06 

LD 

A,(IY+00) 

4A09 

LD 

<IY-03),A 

4A0C 

INC 

IY 

4A0E 

DJNZ 

4A06 

4A10 

JP 

DUMP 12 


FD 

06 

FD 

FD 

FD 

10 

C3 


21 

05 

7E 

77 

23 

F6 

DF 


03 12 

00 

FD 


AF 


Wir hätten dasselbe natürlich auch mit LD 1^,1200, 
LD A,(IY+03) und LD <IY+00>,A erreicht, doch sollte 
wenigstens hier einmal mit negativem Oftset gear- 
beitet werden. 


L16-: 


.3 4BO0 
4B03 
4B06 
4B09 
4B0B 


LD 

HL, 

1203 

21 

03 

12 

LD 

DE, 

1200 

11 

00 

12 

LD 

BC, 

0005 

01 

05 

00 

LD IR 



ED 

B0 

AF 

JP 

DUMP12 

C3 

DF 


L16.3.2 a) 10EF 
b) 12EF 


1000 (r üc k wart b!) 
1200 c) 12 EF 

12 E 2 BC 9 A 3 . Probedaten 
2 . Probedaten 
1. 

4. 


L16.4.: 


L16.6.4 


12E4 
12E6 
12E8 
12EA 
12EC 
12EE 

2000 

2013 

2014 

2015 

2016 
2010 
201A 
201B 
201E 
2021 

4000 

4002 

4005 

4008 

400B 

400D 

400E 

4011 

4012 
4014 
4016 


78 56 
34 12 
1B 30 
13 30 
0B 30 
03 30 


n 


Probedaten 
R ückspr ungadresse 
R ück sp rungadresse 
Rücksprungadresse 
Rücksprungadresse 

wie P16- 4.1 




. . 


wi 

LD 

D, H 

54 



LD 

E, L 

5D 



EX 

AF,AF' 

08 



ADC 

HL, HL 

ED 

6 A 


ADC 

HL, DE 

ED 

5A 


EX 

AF,AF’ 

08 



CALL 

PAUSWK 

CD 

D4 

AF 

CALL 

SBMONI 

CD 

B3 

AF 

JR 

LABEL 

18 

E5 


LD 

A, 01 

3E 

01 


LD 

DE,6801 

11 

01 

68 

CALL 

TIMST 

CD 

33 

00 

LD 

A, <E0O5> 

3A 

05 

E0 

L.D 

H , 00 

26 

00 


LD 

L, A 

6F" 



LD 

DE,0006 

1 1 

06 

00 

AND 

A 

A7 



SBC 

HL, DE 

ED 

52 


JR 

NC,4012 

30 

FC 


CCF 


3F 




Anhang 


L.16.7.2 
b) 412A 


4017 

ADC HL,DE 

ED 

5A 


4019 

l-D A, L. 

7D 



401A 

INC A 

3C 



401B 

CALL OUTBYT 

CD 

30 

AF 

40 IE 

CALL FAUSWK 

CD 

D4 

AF 

4021 

CALL LETNL 

CD 

06 

00 

4024 

JR 4008 

18 

E2 


) L.. 

i n _ 

2 ist das Label 

mit dem Wert 


2C 


c ) L i n e Hex ad es :i. ma 1 ; 


e> 412D 


lai-a ,4 \ II • , . ~ 7. ~ ' 1 «■ i j. »löi zahl , 2 

- f W 1 das ^-Register ab hier eine innere 
ocr 11 ei fe kon tr o 11 i er en so 1 .1 . e) 41 2D 4 1 4 c 

100d g) Alle sechs. ""’ 414 ^ 

L16.8.3 2O00 
2002 

LOOP 2005 

2007 

2008 

2009 
200B 
200E 

2010 
(Ab 1 auf datier 

L16.8.4 2000 
2002 
2005 

2007 

2008 
2009 
200B 

abgel eseneri Zahl en 


LD 

B, A0 

06 

A0 

L.D 

HL,1200 

21 

00 

LD 

A,R 

ED 

5F 

LD 

(HL) , A 

77 


INC 

HL 

23 


LD 

A, 33 

3E 

33 

CALL 

WARTEN 

CD 

B 8 

DJNZ 

LOOP 

10 

F5 

JP 

DUMP 1 2 

C3 

DF 

so etwa 40 Sekunden!) 


LD 

B, A0 

06 

A 0 

L.D 

HL,1200 

21 

00 

LD 

A, R 

ED 

5F 

LD 

(HL),A 

77 


INC 

HL 

o? 


DJNZ 

2005 

10 

FA 

JP 

DUMP 12 

C3 

DF 


AF 


AF 


12 


AF 


zeigen, daß in R j e 


klen lang ist, 
kl us 


35 Taktzy™ 
jedem 7. Zy* 


Die 160 

Schleife um 5 weitergezählt wird. Da die Schleife 
- wie berechnet (siehe ZBO-Handbuch) 
wird in R offenbar bei 
eins weiter gezählt. (i nkrement i er t). 
Anregung: Bauen Sie in die Schleife an sich sinn- 
ose aber unschädliche Befehle ein, deren Bearbei 
tungsdauer (in Taktzyklen) Sie dem Handbuch'ent¬ 
nehmen. Kontrollieren Sie, ob sich auch dann die 
obige Rechnung bestätigt. 


L16.9 
B i 17 s 
B i 16 s 
Bit5: 
Bit4: 
B i 13 s 
Bit2: 
Bi 11: 
Bi 10s 


2 Sie könnten dabei herausfinden: 

cjesetzt bei "negativem" Ergebnis 
Z-Flag, gesetzt bei Ergebnis 0 (bzw. gleich) 
(unbenutzt??) 

H~ P1ag, Ha1bbyte-übertrag 
2 (unbenutzt??) 

P/V-Flag, Parität und Überlauf 

N-Fl ag, vom Prozessor intern benutzt 
C-F1 ag, übert r ag sb i t, Carr y. 
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L16.9.3 2000 
2002 
2004 
2007 
2009 
20 OB 
200C 
200E 
2011 
2012 
2015 
2018 


B, 08 
D, OO 
CALL INBYTE 
RL A 

NC,200C 
D 

2007 
CALL PRINTS 
LD A, D 
CALL OLJTBYT 
CALL LETNL 
JR 2000 


LD 

LD 


JR 

INC 

DJNZ 


06 08 
16 00 


CD 

CB 


57 

17 


AF 


30 01 
14 
10 F9 
CD OC 00 
7A 

CD 30 AF 
CD 06 00 
18 E6 


;8 Binärst. 

;Einsen zahl. 

; B i 17 -> Cy ^ 

5 wenn Cy 0 
;Ei ns zählen 


LI7.1.2 a) 3004, 30 
b) Elementes_4_ 


13, 30IC, 302F 
6 


Ablaufzeit: 


D__ 

~4s~ 


50s 


P18.3.1 ab Speicherstelle 400D 


so ab s 


400D 

PUSH 

HL 

E5 


400E 

CALL 

TONAB 

CD B2 02 


4011 

POP 

HL 

El 


4012 

INC 

HL 

23 


4013 

LD 

A, H 

7C 


40 14 

CP 

12 

FE 12 


4016 

JR 

NZ,40OD 

20 F5 


4018 

CALL 

SBMONI 

CD B3 AF 


401B 

JR 

4000 

18 E3 


rn Sie 

auch 

(4002) und (401b). 


2000 

CALL 

CLS 

CD 9F AF 

5 1 - 

2003 

LD 

B, 10 

06 10 

; 2 . 

2005 

LD 

IX,1300 

DD 21 00 13 

s . 

2009 

LD 

H,(IX+O0) 

DD 66 00 

9 4. 

200C 

LD 

L,(IX+Ol) 

DD 6 E 01 

5 5. 

2O0F 

LD 

A, <IX+02) 

DD 7E 02 

5 6 . 

2012 

LD 

(HL.) , A 

77 

5 7. 

2013 

INC 

IX 

DD 23 

58 « 

2015 

INC 

IX 

DD 23 


2017 

INC 

IX 

DD 23 


2019 

DJNZ 

2009 

IO EE 

59 . 

201B 

CALL. 

PAUSWK 

CD D4 AF 

; 10. 

20 IE 

RST 

OO 

C7 



L19.2.6 
15E0 FO 
15EE FO 
15FC FO 
160A FO 
1618 FO 
1626 FO 
1634 FO 


ss TBP0S3 (Prüfsumme: D540) 

FO FO FO FO FO FO FO FO FO FO 
FO FO FO FO FO FO FC FO FO FO 
FO FO FO FO FO FE FF FD FO FO 
FO FO FO FO FO FA FF F5 FO FO 
FO FO FO FO FO F8 FF F4 FO FO 
FO FO FO FO F8 FF FF FF F4 FO 
FO FO FO F8 FF FF FF FF FF F4 


FO FO FO 
FO FO FO 
FO FO FO 
FO FO FO 
FO FO FO 
FO FO FO 
FO FO FO 
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1642 FO FO Fö FS FF F7 FA FF F5 FB FF F4 FO FO 

1650 F0 F0 FO FO FB FD FA FF F5 FE F7 FO FO FO 

165E FO FO FO FO FO FB FF FF FF F7 FO FO FO FO 

166C, FO FO FO FO FO FO FA FF FF F4 FO FO FO FO 

167A FO FO FO FO FO FB FF FF FF FF FC FO FO FO 

1688 FO FO FO FO F8 FF F7 FO FO F3 FF FD FO FO 

1696 FO FO FO F8 FF F3 FO FO FO FO FE FF F.l FO 

16A4 F9 F4 FC FF Fl FO FO FO FO FE FF Fl FO FO 

16B2 FO FB F7 FO FO FO FO FO FO F2 FD F4 FO FO 

Dazu gehört 

P0S3 2039 LD IY,TBP0S3 FD 21 EO 15 

203D CALL BILD CD 06 20 

2040 HALT 76 j(RET) 

L19.4.1 5000 LD HL,1FFE 21 FE 1F 

5003 LD DE,16DC 11 DC 16 

5006 LD BC,OOAA 01 AA 00 

5009 L.DIR ED BO 

50OB R5T OO C7 


b) 

In 16E1 


JP 2041 

— > 

JP 171F 

In 

17ÖB, 

1713, 

171 B 

CALL 2006 

--> 

CALL 16E4 

In 

1727, 

173F, 

1757, 176F 

CALL 2029 

- > 

CALL 1707 

In 

1 72D, 

1739, 

1745, 1751, 





175D, 

1769, 

1775, 1701 

'call 2031 


CALL 170F 

In 

1733, 

174B, 

1763, 177B 

CALL 2039 


CALL 1717 

Pr 

ü-f summe 

> (1400 

... 1705) 

= 2D6FD 



Startadresse: 16DC 




| OO 1 o 

L X- jL a 1 . jC 

PDUMP 

(2000 ... 

20BA) -•> 

(ACF5 

... ADAF) 

In 

ACFB 



CALL 2046 

- > 

CALL AD3B 

In 

ADÖA, 

AD0E, 

AD 17 

CALL 2060 

-> 

CALL AD5D 

In 

ADU, 

AD 1A 


CALL 208A 

... 

CALL AD7F 

In 

AD2D, 

AD69, 

AD 75 

CALL 208C 

~> 

CALL AD81 

In 

AD 70 



JP 208C 

~> 

JP AD81 

In 

AD31 , 

AD37 


CALL 207E 

-> 

CALL AD73 

In 

ACF5 



11 92 20 

~> 

11 87 AD 

In 

AD24 



FA 42 20 

— > 

FA 37 AD 

In 

AD 50 



11 AA 20 

- > 

AA 9F AD 

In 

AD 59 



32 20 20 

> 

32 15 AD 

Pr v 

üfsumme 

(ACF5 

... ADAF> 

* 5CD0 



b) 


VERBCH 

<3000 ... 

3078) -> 

(AC7C 

... ACF4) 

In 

AC7C 



11 56 30 

- > 

11 D2 AC 

In 

AC9A 



11 72 30 

- > 

11 EE AC 

In 

ACB6 



FA 4B 30 

- > 

FA C7 AC 

Pr ■: 

j-f su in/ne 

(AC7C 

... ACF4) 

■ 3405 
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Anhang 


D Überblick über die EBS-Routinen und -Programme 


(M) besagt, daß dieses Programm auch über MENUE erreichbar ist. 


CLS Clear screen 
Alle Register geschützt. 


CALL AF9F —» RET 
Vgl. 14.5 


DEZHEX (M) J p AE34 Schleife 

Verwandelt Dezimalzahlen < 065536 in Hexadezimalzahlen Vgl. 15.5 

DISASS (M) I p B00 ° Schleife 

Disassembliert im Speicher stehende Maschinenprogramme. Ausgabe: 
Display oder Display & Printer. Vgl. 23.. 

DUMP12 IP AFDF —> Monitor 

Entspricht dem Monitor-Befehl Dl200 Vgl. 8.1 

HEXDEZ (M) J p AE92 Schleife 

Verwandelt vierstellige Hexadezimalzahlen in Dezimalzahlen. Vgl. 15.1 

IN BYTE CALL AF57 —» RET 

Liest ein Byte von der Tastatur ein. Gibt Echo auf dem Bildschirm. 
Eingabe steht im Akku. Vgl. 14.4 

IN6HEX CALL AF47 RET 

IN4HEX CALL AF4C —» RET 

IN2HEX CALL AF51 —> RET 

Einlesen einer n-stelligen Hexadezimalzahl mit Echo und Ablage im 
Speicher. HL muß zu Anfang auf den Speicherplatz zeigen, in dem das 
erste Byte abgelegt werden soll. HL wird je Byte einmal dekrementiert. 
HL und A ungeschützt. Vgl. 14.5 

KYECH CALL AFA7 —> RET 

Wartet mit blinkendem Cursor auf eine Eingabe. Nach Eingabe Echo 
und Rückkehr mit ASCII der gedrückten Taste im Akku. Vgl. 14.3 

JP AA32 -*• Auswahl 
Vel. 22.4 


MENUE 


MSGNL = MSG + LETNL 
AF ungeschützt 


CALL AFED —* RET 
Vgl. 7.3 


NULL12 CALL AFF4 —* RET 

Setzt Speicher 1200... 129F auf null. A, B und HL ungeschützt. Vgl. 6.3 
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OFFSET {M) 

Berechnet und codiert Sprungweiten. 


JPAB47 


■> Schleife 
Vgl. 22.3 


OUTBIN CALL AEF8 RET 

Gibt den Akkuinhalt als Binärzahl aus. AF ungeschützt. Vgl. 14.8 


•RET 


OUTBYT CALL AF30 - 

Gibt den Akkuinhalt als Hexadezimalzahl aus. AF ungeschützt. 

Vgl. 14.6 

O UT6HX CALL AF20 —» RET 

O UT4HX CALL AF25 —* RET 

OUT2HX CALL AF2A -> RET 

Gibt eine n-stellige Hexadezimalzahl auf dem Bildschirm aus. HL muß 
am Anfang auf den Speicherplatz zeigen, aus dem das erste Byte ausge¬ 
geben werden soll. Nach jedem Byte wird HL dekrementiert. HL und A 
ungeschützt. Vgl UJ 

PAUSKY CALL AFD9 — > RET 

Diese Subroutine hält den Programmablauf an, bis eine Taste gedrückt 
wird. Wo sie in schnellen Programmen ignoriert wird, benutze man 
PAUSWK. AF ungeschützt. g 2 

PA US WK CALL AFD4 —» RET 

Wie PAUSKY, jedoch mit vorgelcgter Verzögerung. Vgl. 10.5 


PDUMP |M) 

Druckt Speicherauszug. 

PRUESU( M) 

Berechnet Prüfsummen. 

SBMONI 

wenn SHIFT & BREAK gedrückt, 

AF ungeschützt. 

VERIFY{ M) 

Überprüft Speicherinhalt byteweise. 
VERSCH (M) 

Verschiebt Speicherblöcke. 
WARTEN 

Warteschlcife, deren Ablaufdauer voi 


fP ACF5 —* Monitor 
Vgl. 21.2 

JP ADBO —» Schleife 
Vgl. 16.1 

CALL AFB3 -» RET, 
—» Monitor 
Vgl. 10.6 

JP ABD7 —» Schleife 
Vgl. 22.2 

JP AC7C —> Schleife 
Vgl. 22.1 

CALL AFB8 -» RET 
Akkuinhalt bestimmt wird. 

Vgl. 10.5 


238 


Stichwortverzeichnis 


A 

Absolute Sprungadresse 36 
ADC 29 
ADC HL,ss 33 
ADD A,r 26 
ADD HL,ss 33 
Addition 26, 28, 33, 53 
Adreßbus 14 
Adresse 14, 21 
Adressierung, indirekte 33 
Adressierung, indizierte 53 
Akkumulator 19 
AND 71 

Anwenderstapel 59 
Arbeitsbereich 18 
ASCII (American Standard Code] 45 
Assembler, assemblieren 20 
Assemblersprache 57, 96 
Aufzeichnen auf Band 44 

B 

BASIC-Zeilennummern 216 
BELL (Monitor-Routine] 42 
Bildschirmcode 54 
Bildspeicher 54 
Binärzahlen 11 
Bit 12 

bitweise Codierung 25 
bitweise Multiplikation 65 
Blocktransfer 100 
BRKEY (Monitor-Routine) 62 
BYTE 15 


C 

CALL 41 
Carry-Flag 26 
CCF 27 

CLS (EBS-Routine) 80 
Codierung, bitweise 25 
Compiler 15 
Conway, John Horton 195 
CP n 39 
CPU 11 

D 

D-Befehl 17 

DAA 29, 92 

Datenbus 11 

Dezimaladdition 29 

Dezimalmultiplikation 75 

Disassembler 171 

Division 106 

DJNZ 35 

Drucken 155 

Dualsystem 12 

DUMP (Monitor-Routine) 50 

DUMP12 (EBS-Routine) 49 

E 

EBS (Erweitertes Betriebssystem) 43 
EBS-Routinen (Überblick) 238 
EX AF,AF' 103 
EX (SP),HL 58 

F 

Farbgebung 149 
Flag-Register 27, 114 
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Stich Wortverzeichnis 


G 

GETKY (Monitor-Routine] 50, 77 
Grafik, schnelle 141 

H 

Halbbytes-Swap 75 
HALT 20, 22 

Hexadezimaladdition 28, 33 
Hexadezimalzahlen 11 
Hexdump 22 

Hornersches Schema 87 / 

I 

INBYTE (EBS-Routine] 81 
INC HL 34 
INC SP 58 
Indexregister 53 
indirekte Adressierung 33 
indizierte Adressierung 53 
Interpreter 15 
Intervall-Timer 108 
INnHEX (EBS-Routinen] 84 

I 

J-Befehl 22 
JPnn 23 

JR C,e JR NC,e JR Z,e 
JR NZ,e 39 

K 

Kilobyte, KB 15 

Kopieren von Registerinhalten 32 
KYECH (EBS-Routine) 80 

L 

Label 82 

LD (HL],A LD (HL|,n 34 
LD (nn),A 19 
LD (nn),dd 32 
LDA,(nn] LDA,n 19 
LD dd,(nn) 32 
LD dd,nn 31 
LDr,r' 25 
LDDR LDIR 101 
LEBEN 195 

LETNL (Monitor-Routine) 48 

LIFO-Struktur 57 

LSB (Lower Significant Byte) 21 


M 

M-Befehl 18 
Maschinenprogramme 15 
Maske, Maskieren 72 
Master Mind 191 
MELDY (Monitor-Routine) 138 
MENUE (EBS) 167 
Mikromühle 202 
Mikroprozessor 11, 15 
MLDSP (Monitor-Routine) 139 
Mnemonic 20 

Monitor, Monitorprogramm 17, 23 
24 

MSB (Most Significant Byte) 21 
MSG (Monitor-Routine) 48 
MSGNL (EBS-Routine) 48 
Multiplikation, bitweise 65 
Multiplikation, dezimale 75 
Musik 137 

N 

Negative Zahlen 30 
Neumann, f. v. (Intel-Format) 21 
Nibble 25 
NOP 27 

NULL 12 (EBS-Routine) 43 
O 

Offset 62, 165 

OFFSET (EBS-Routine) 165 

Opcode 20 

Operand 21 

OR 72 

OUTBIN (EBS-Routine) 85 
OUTBYT (EBS-Routine) 84 
OUTnHX (EBS-Routinen) 85 

P 

P/V-Flag 155, 118 
PASSWORD 213 
PAUSKY (EBS-Routine) 50 
PAUSWK (EBS-Routine) 61 
Permutationen 119 
Permutationen durch Rekursion 128 
PMSG (Monitor-Routine) 155 
POP 55 

PRINTS (Monitor-Routine) 47 



Stich Wortverzeichnis 
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PRNT (Monitor-Routine) 45 
Prüfsumme 97 
Pseudotetraden 87 
PUSH 55 

R 

Random-Generator 111 
Raummühle 208 
Refresh-Register 112 
Register 19, 103 
Rekursion, Permutationen 
durch 128 
Relative Sprünge 35 
Relokatieren 101, 148 
RENUMBER, Hinweise zu 218 
RESET, Resettaste 22 
RET 41 
RET NZ 63 
RL (HL) 66 
RLD 75 
Rotieren 65 
RRD 75 
RSTn 63 

Rückwärtssprung 37 
S 

Saven auf Band 44 
SBC A,r 30 

SBMONI (EBS-Routine) 62 

SCF 27 

Schleife 36 

Schlingpflanzen 198 

Shiften 65 

Sirene 140 

SLA (HL) 66 

Speicher, ein Blick in den 17 
Speicherinhalt verändern 18 
Sprünge, absolut und relativ 35, 36 
Sprünge, bedingt und unbedingt 35 
Sprungweite 36 
Stack, Stapel 55 
Stackpointer 55, 58 
Stapel 55 

Stapel, Anwender-, System- 59 
Stapelmanipulation 56 
Stellenwert 14 


Strings und Zeichen 45 
SUB r SUB A,r 30 
Subroutinen 41 
Subroutinen, Verschachtelung 
von 42 

Subtraktion 28, 30 
Swap, Halbbytes- 75 
Systemstapel 59, 101 

T 

Taktzyklen 113 
Tastaturentprellung 78 
Textverarbeitung 
(Komma-Probleme) 215 
TIMRD (Monitor-Routine) 104 
TIMST (Monitor-Routine) 104 
Töne, Musik aus vorgegebenen 
-n 137 

U 

Uhr, eingebaute 104 
Um wandeln von Zahlensystem 
in anderes 87 
Umwandeln dezimal nach 
hexadezimal 94 
Unterprogramme (Subroutinen) 

41, 42 

Utilities 43 
V 

VERIFY (EBS) 163 

Verkehrsampel 150 

VERSCH (EBS) 161 

Verschieben siehe Blocktransfer 100 

Verzweigung 36 

Video-RAM 54 

Viertelung der Schreibposition 141 
Vorwärtssprung 37 

W 

WARTEN (EBS-Routine) 60 
WAS-WOHIN-WOHER 19 

X 

XOR 72 
XTEMP 138 
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Sti ch wortverzci chnis 


Z 

Zahlensysteme (Umwandeln 
von/in) 87 

Zeichen und Strings 45 
Zeilennummem (BASIC) 216 
Zufallspermutationen 122 
Zufallszahlen 102, 108, 112 
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Der Weg zur 
ZX Spectrum- 
Meisterschaft 

Reihe HC - 
Mein Home-Computer 
216 Seiten, 

19 Abbildungen, 
30,- DM, 1985 
ISBN 3 8023 0810 7 


Durch das Erscheinen der Mikro¬ 
drives und der Interfaces I und II 
wurder der ZX Spectrum noch viel¬ 
seitiger einsetzbar. Wie man BA- 
SlC-Programme durch Maschinen¬ 
code-Routinen erweitert, die tech¬ 
nischen Möglichkeiten des ZX 
Spectrum ganz ausnutzt und aktu¬ 
elle Peripherie-Einheiten erfolg¬ 
reich einsetzt — das erfahren Sie 
hier sehr ausführlich. Kenntnisse in 
BASIC werden vorausgesetzt. 
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Künstliche Intel¬ 
ligenz für Ihren 
ZX-Spectrum 

Reihe HC - 
Mein Home-Computer 
ca. 192 Seiten, 
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ISBN 3-8023 0862 X 


Das Buch gibt eine Einführung in 
einige Techniken der künstlichen 
Intelligenz (Kl). Es beschränkt sich 
auf solche Aspekte von Kl, die 
leicht auf dem ZX-Spectrum anzu¬ 
wenden sind. Voraussetzung zum 
Gebrauch des Buchs sind Kennt¬ 
nisse in BASIC; eine erste Bekannt¬ 
schaft mit dem Maschinencode 
kann ebenfalls nützlich sein, denn 
viele der Routinen kann man dann 
in Maschinencode umsetzen. 


Anhand aktionsgeladener und teils 
kniffliger Spiele werden Sie mit 
Programmiertechniken und Tricks 
vertraut gemacht. Wenn Maschi¬ 
nencodeprogramme eingesetzt 
sind, werden hinreichende Erläute¬ 
rungen gegeben. Das intensive Ar¬ 
beiten mit diesem Buch wird Ein¬ 
steigern wie Fortgeschrittenen glei¬ 
chermaßen Freude bereiten, neue 
Perspektiven eröffnen und zum 
kreativen Computern anregen. 


Guss, Thomas 
Was der ZX 
Spectrum alles 
kann 

Reihe HC - 
Mein Home Computer 
160 Seiten, 
zahlr Abbildungen 
und Listings, 

28, DM, 1984 
ISBN 3 8023 0762 3 
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Computer für 
den Kleinbetrieb 

Reihe CHIP WISSEN 
148 Seiten, 

12 Abbildungen, 

3. Auflage 1984 
25,- DM 
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Der Computer ist die nützlichste 
Büromaschine, die je erfunden 
wurde. Dieses Buch weist als prak¬ 
tischer Leitfaden gezielt den richti¬ 
gen und zugleich risikolosen Weg 
zur eigenen Computerlösung nach 
Maß, unterstützt durch eine Reihe 
von Checklisten und Formularmu¬ 
stern aus der Praxis. Alles Nützliche 
für den Einstieg sowie Arbeitsvor¬ 
gänge und Programme werden ver¬ 
mittelt. 


Das Buch vermittelt die systemati¬ 
sche Entwicklung von Programmen 
in Pascal, das in Verbindung mit 
dem UCSD-Betriebssystem ein 
ideales Programmierwerkzeug dar¬ 
stellt und sich nicht nur im Ausbil¬ 
dungsbereich durchgesetzt hat. Es 
wendet sich in erster Linie an den 
Anfänger, der im Selbststudium 
oder unter Anleitung in Schule oder 
Seminar das Programmieren erler¬ 
nen will. 


Teiwes, Eike 
Programment¬ 
wicklung in 
UCSD-Pascal 

Reihe CHIP WISSEN 
344 Seiten, 
zahlr. Abbildungen 
150 Seiten Übungen, 
28,- DM, 1984 
ISBN 3-8023-0760 7 



Czerwinski, M. 
Testen Sie Ihr 
Mikrowissen 

Band 1: Hardware 
Reihe CHIP WISSEN 
144 Seiten, 

28,- DM, 1985 
ISBN 3-8023-0812-3 


Wie weit reicht Ihr Wissen über 
Mikrocomputer-Hardware/Soft- 
ware? Bereiten Sie sich auf Prüfun¬ 
gen vor? Diese beiden Bände hel¬ 
fen Ihnen, Schwachstellen zu er¬ 
kennen. Sie werden fit nach der 
Trial-and-Error-Methode und mit 
Hilfe ausführlicher Antworten. 

Egal, an welcher Stelle Sie einstei¬ 
gen: Es macht Spaß, den Lerner¬ 
folg anhand der Knobeltabellen 
festzustellen! 


Czerwinski, M. 
Testen Sie Ihr 
Mikrowissen 

Band 2: Software 
Reihe CHIP WISSEN 

160 Seiten, 

30,- DM, 1985 
ISBN 3-8023-0825-5 
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Monat über 
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Und 
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C e memu 


Home 


Jeden Monat: ^ ^ 

Hs Programme für alle gängigen Home-Computer 
Hs Anwendungsbeispiele aus der Praxis 
Hs Marktübersicht, Tests und Kaufberatung für Zusatzgeräte 
und Home-Computer 

Hs Schnellkurse für Einsteiger zum Sammeln 
Hs Tips und Tricks 

Hs Interessantes, Aktuelles und Unterhaltsames aus der 
Home-Computer-Szene 
Hs News, Clubnachrichten 

Holen Sie sich die neueste Ausgabe bei Ihrem Zeitschriften¬ 
händler oder fordern Sie ein Kenneniernheft direkt beim Vogel 
Verlag, Leserservice HC, Postfach 67 40, 8700 Würzburg, an. 






Die Sprache des Mikroprozessors Z80 (bzw. Z80A) ist überall 
dieselbe - unabhängig davon, in welchem Computer der Z80 
arbeitet. Der Verfasser wählte als Beispielmodell den MZ-700. weil 
er ein gängiger Mikrocomputer ist, sich ausgezeichnet zum Arbei¬ 
ten in der Maschinensprache eignet und hervorragend dokumen¬ 
tiert ist. Auch wer mit einem anderen Z80-Computer arbeitet, wird 
viele brauchbare Beispiele und Anregungen finden. In jedem Fall ist 
es nützlich, wenn der Leser bereits Kenntnisse im Programmieren 
hat. 

Dieses Buch vermittelt die wichtigsten Grundbegriffe und Z80- 
Befehle, unterstützt beim Zurechtfinden in den Handbüchern und 
Kennenlernen gängiger Programmstrukturen, gibt Anregungen für 
eigenes Arbeiten und zum Gebrauch von Dienstprogrammen, ver¬ 
rät viele nützliche Programmiertricks. 
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